
## The Social Origins of Democracy and Authoritarianism Reconsidered: Prussia and Sweden in Comparison
## by Erik Bengtsson and Felix Kersting
## to be published in Comparative Political Studies, 2025
## Swedish municipality data set
##
## 2. SCRIPT TO ENTER THE 1911-1944 ELECTIONS DATA AND MERGE IT WITH OUR DATASET
##
##
## overview of this script
## lines ~20-60 entering the dataset and identifying the county variable (V5) and the municipality variable (V9)
## lines ~60-2500 cleaning municipality names so they are linkable to our data
## lines ~2570-2715 consistency of municipalities over time (changing names, mergers etc)
## lines ~2715- merging municipalities that are divided into two units in SND because they straddled a county or district border
## lines ~2830-2870 removing urban municipalities and those that become urban during the 1911-1944 period
## lines ~2870-2885 removing municipalities that are dissolved over the 1911-1944 period
## lines ~2890-3500 fixing errors in the SND dataset
## lines ~3500-3600 creating the political analysis variables (turnout, party choice etc)
##


# Set WD
# setwd("")

library(readxl)
library(openxlsx)
library(dplyr)
library(foreign)
library(tidyverse)

## download the data from Swedish National Dataservice: https://snd.se/sv/catalogue/dataset/snd0204-1/1.0

## the SND data is in an excel file. we read the excel file:
electiondata<- read_excel("0204 election outcomes 1911-1944.xlsx", sheet="Data")
electiondata<-select(electiondata, -c(V162:V218))
electiondata<-select(electiondata, -c(V1:V3))
electiondata<-select(electiondata, -V8)
names(electiondata)[names(electiondata) == "V9"] <- "kommun"

electiondata$County<-electiondata$V5
electiondata$County<-as.character(electiondata$County)
electiondata["County"][electiondata["V5"] == "2"] <- "Stockholm"
electiondata["County"][electiondata["V5"] == "3"] <- "Uppland"
electiondata["County"][electiondata["V5"] == "4"] <- "Södermanland"
electiondata["County"][electiondata["V5"] == "5"] <- "Östergötland"
electiondata["County"][electiondata["V5"] == "6"] <- "Jönköping"
electiondata["County"][electiondata["V5"] == "7"] <- "Kronoberg"
electiondata["County"][electiondata["V5"] == "8"] <- "Kalmar"
electiondata["County"][electiondata["V5"] == "9"] <- "Gotland"
electiondata["County"][electiondata["V5"] == "10"] <- "Blekinge"
electiondata["County"][electiondata["V5"] == "11"] <- "Kristianstad"
electiondata["County"][electiondata["V5"] == "12"] <- "Malmöhus"
electiondata["County"][electiondata["V5"] == "13"] <- "Halland"
electiondata["County"][electiondata["V5"] == "14"] <- "Gbg och Bohus"
electiondata["County"][electiondata["V5"] == "15"] <- "Älvsborg"
electiondata["County"][electiondata["V5"] == "16"] <- "Skaraborg"
electiondata["County"][electiondata["V5"] == "17"] <- "Värmland"
electiondata["County"][electiondata["V5"] == "18"] <- "Örebro"
electiondata["County"][electiondata["V5"] == "19"] <- "Västmanland"
electiondata["County"][electiondata["V5"] == "20"] <- "Kopparberg"
electiondata["County"][electiondata["V5"] == "21"] <- "Gävleborg"
electiondata["County"][electiondata["V5"] == "22"] <- "Västernorrland"
electiondata["County"][electiondata["V5"] == "23"] <- "Jämtland"
electiondata["County"][electiondata["V5"] == "24"] <- "Västerbotten"
electiondata["County"][electiondata["V5"] == "25"] <- "Norrbotten"

## we will merge the elections data to our own dataset by the municipality name, so these need to conform to each other
## this code cleans up the names:

# STOCKHOLM COUNTY
electiondata["kommun"][electiondata["kommun"] == "LOVO"] <- "Lovö"
electiondata["kommun"][electiondata["kommun"] == "EKER@"] <- "Ekerö"
electiondata["kommun"][electiondata["kommun"] == "MUNS@"] <- "Munsö"
electiondata["kommun"][electiondata["kommun"] == "ADELSO"] <- "Adelsö"
electiondata["kommun"][electiondata["kommun"] == "FARENTUN"] <- "Färentuna"
electiondata["kommun"][electiondata["kommun"] == "HILLESHO"] <- "Hilleshög"
electiondata["kommun"][electiondata["kommun"] == "SANGA"] <- "Sånga-Sthlm"
electiondata["kommun"][electiondata["kommun"] == "SKA"] <- "Skå"
electiondata["kommun"][electiondata["kommun"] == "SPANGA"] <- "Spånga"
electiondata["kommun"][electiondata["kommun"] == "JARFALLA"] <- "Järfälla"
electiondata$kommun[electiondata$kommun == "ED" & electiondata$V4 == "202040"] <- "Ed-Sollentuna"
electiondata["kommun"][electiondata["kommun"] == "SOLLENTU"] <- "Sollentuna"
electiondata["kommun"][electiondata["kommun"] == "LAGGA"] <- "Lagga"
electiondata["kommun"][electiondata["kommun"] == "OSTUNA"] <- "Östuna"
electiondata["kommun"][electiondata["kommun"] == "HUSBYLAN"] <- "Husby-Långhundra"
electiondata["kommun"][electiondata["kommun"] == "NARTUNA"] <- "Närtuna"
electiondata["kommun"][electiondata["kommun"] == "GOTTRORA"] <- "Gottröra"
electiondata["kommun"][electiondata["kommun"] == "KARSTA"] <- "Kårsta"
electiondata["kommun"][electiondata["kommun"] == "ALSIKE"] <- "Alsike"
electiondata["kommun"][electiondata["kommun"] == "KNIVSTA"] <- "Knivsta"
electiondata["kommun"][electiondata["kommun"] == "ODENSALA"] <- "Odensala"
electiondata["kommun"][electiondata["kommun"] == "HUSBYARL"] <- "Husby-Erlinghundra"
electiondata["kommun"][electiondata["kommun"] == "NORRSUND"] <- "Norrsunda"
electiondata["kommun"][electiondata["kommun"] == "VASSUNDA"] <- "Vassunda"
electiondata["kommun"][electiondata["kommun"] == "HAGA"] <- "Haga"
electiondata["kommun"][electiondata["V4"] == "204100"] <- "St Olof-Erlinghundra"
electiondata["kommun"][electiondata["kommun"] == "SKEPPTUN"] <- "Skepptuna"
electiondata["kommun"][electiondata["V4"] == "205020"] <- "Lunda-Seminghundra"
electiondata["kommun"][electiondata["kommun"] == "VIDBO"] <- "Vidbo"
electiondata["kommun"][electiondata["kommun"] == "SKANELA"] <- "Skånela"
electiondata["kommun"][electiondata["kommun"] == "MARKIM"] <- "Markim"
electiondata["kommun"][electiondata["kommun"] == "ORKESTA"] <- "Orkesta"
electiondata["kommun"][electiondata["kommun"] == "FROSUNDA"] <- "Frösunda"
electiondata["kommun"][electiondata["kommun"] == "FRESTA"] <- "Fresta"
electiondata$kommun[electiondata$V4 == "206020"] <- "Hammarby-Vallentuna"
electiondata["kommun"][electiondata["kommun"] == "VALLENTU"] <- "Vallentuna"
electiondata["kommun"][electiondata["kommun"] == "VADA"] <- "Vada"
electiondata["kommun"][electiondata["kommun"] == "ANGARN"] <- "Angarn"
electiondata["kommun"][electiondata["kommun"] == "OSSEBYGA"] <- "Össeby-Garn"
electiondata["kommun"][electiondata["kommun"] == "BORSTIL"] <- "Börstil"
electiondata["kommun"][electiondata["kommun"] == "GRASO"] <- "Gräsö"
electiondata["kommun"][electiondata["kommun"] == "HARG"] <- "Harg"
electiondata["kommun"][electiondata["kommun"] == "EDEBRO"] <- "Edebo"
electiondata["kommun"][electiondata["kommun"] == "HOKHUVUD"] <- "Hökhufvud"
electiondata["kommun"][electiondata["kommun"] == "VALO"] <- "Valö"
electiondata["kommun"][electiondata["kommun"] == "FORSMARK"] <- "Forsmark"
electiondata["kommun"][electiondata["kommun"] == "ALMUNGE"] <- "Almunge"
electiondata["kommun"][electiondata["kommun"] == "KNUTBY"] <- "Knutby"
electiondata["kommun"][electiondata["kommun"] == "FARINGE"] <- "Faringe"
electiondata["kommun"][electiondata["kommun"] == "BLADAKER"] <- "Bladåker"
electiondata["kommun"][electiondata["kommun"] == "UNUNGE"] <- "Ununge"
electiondata["kommun"][electiondata["kommun"] == "EDSBRO"] <- "Edsbro"
electiondata["kommun"][electiondata["kommun"] == "VADDO"] <- "Väddö"
electiondata["kommun"][electiondata["kommun"] == "HAVERO"] <- "Häfverö"
electiondata["kommun"][electiondata["kommun"] == "SINGO"] <- "Singö"
electiondata["kommun"][electiondata["kommun"] == "SODERBYK"] <- "Söderby-Karl"
electiondata["kommun"][electiondata["kommun"] == "ESTUNA"] <- "Estuna"
electiondata["kommun"][electiondata["kommun"] == "LOHARAD"] <- "Lohärad"
electiondata["kommun"][electiondata["kommun"] == "MALSTA"] <- "Malsta"
electiondata["kommun"][electiondata["kommun"] == "HUSBYLYH"] <- "Husby-Lyhundra"
electiondata["kommun"][electiondata["kommun"] == "SKEDERID"] <- "Skederid"
electiondata["kommun"][electiondata["kommun"] == "RIMBO"] <- "Rimbo"
electiondata["kommun"][electiondata["kommun"] == "RO"] <- "Rö"
electiondata["kommun"][electiondata["kommun"] == "FASTERNA"] <- "Fasterna"
electiondata["kommun"][electiondata["kommun"] == "ROSLAGSB"] <- "Roslags-Bro"
electiondata["kommun"][electiondata["kommun"] == "VATO"] <- "Vätö"
electiondata["kommun"][electiondata["kommun"] == "BJOROAR"] <- "Björkö-Arholma"
electiondata["kommun"][electiondata["kommun"] == "FORTUNA"] <- "Frötuna"
electiondata["kommun"][electiondata["kommun"] == "RADMANSO"] <- "Rådmansö"
electiondata$kommun[electiondata$V4 == "213030"] <- "Länna-Sthlm"
electiondata["kommun"][electiondata["kommun"] == "BLIDO"] <- "Blidö"
electiondata["kommun"][electiondata["kommun"] == "OSTARYD"] <- "Östra Ryd-Danderyd"
electiondata["kommun"][electiondata["kommun"] == "TABY"] <- "Täby-Danderyd"
electiondata["kommun"][electiondata["kommun"] == "DANDERYD"] <- "Danderyd"
electiondata["kommun"][electiondata["kommun"] == "SOLNA"] <- "Solna"
electiondata["kommun"][electiondata["kommun"] == "STOCKSUN"] <- "Stocksund"
electiondata["kommun"][electiondata["kommun"] == "LIDINGOK"] <- "Lidingö"
electiondata["kommun"][electiondata["kommun"] == "OSTERAKE"] <- "Österåker-Sthlm"
electiondata["kommun"][electiondata["kommun"] == "RIALA"] <- "Riala"
electiondata["kommun"][electiondata["kommun"] == "ROSLAGSK"] <- "Roslags-Kulla"
electiondata["kommun"][electiondata["kommun"] == "LJUSTERO"] <- "Ljusterö"
electiondata["kommun"][electiondata["kommun"] == "VARMDO"] <- "Vermdö"
electiondata["kommun"][electiondata["kommun"] == "DJURO"] <- "Djurö"
electiondata["kommun"][electiondata["kommun"] == "MOJA"] <- "Möja"
electiondata["kommun"][electiondata["kommun"] == "GUSTAVSB"] <- "Gustavsberg"
electiondata["kommun"][electiondata["kommun"] == "INGARO"] <- "Ingarö"
electiondata["kommun"][electiondata["V4"] == "216060"] <- "Bo-Sthlm"
electiondata["kommun"][electiondata["kommun"] == "OSTERHAN"] <- "Österhaninge"
electiondata["kommun"][electiondata["kommun"] == "ORNO"] <- "Ornö"
electiondata["kommun"][electiondata["kommun"] == "NAMDO"] <- "Nämdö"
electiondata["kommun"][electiondata["kommun"] == "UTO"] <- "Utö"
electiondata["kommun"][electiondata["kommun"] == "TYRESO"] <- "Tyresö"
electiondata["kommun"][electiondata["kommun"] == "DALARO"] <- "Dalarö"
electiondata["kommun"][electiondata["kommun"] == "VASTERHA"] <- "Vesterhaninge"
electiondata["kommun"][electiondata["kommun"] == "NYNASHAM"] <- "Nynäshamn"
electiondata["kommun"][electiondata["kommun"] == "MUSKO"] <- "Muskö"
electiondata["kommun"][electiondata["kommun"] == "OSMO"] <- "Ösmo"
electiondata["kommun"][electiondata["kommun"] == "SORUNDA"] <- "Sorunda"
electiondata["kommun"][electiondata["kommun"] == "TORO"] <- "Torö"
electiondata["kommun"][electiondata["kommun"] == "GRODINGE"] <- "Grödinge"
electiondata["kommun"][electiondata["kommun"] == "BOTKYRKA"] <- "Botkyrka"
electiondata["kommun"][electiondata["kommun"] == "SALEM"] <- "Salem"
electiondata["kommun"][electiondata["kommun"] == "HUDDINGE"] <- "Huddinge"
electiondata["kommun"][electiondata["kommun"] == "NACKA"] <- "Nacka"
electiondata["kommun"][electiondata["kommun"] == "SALTSJOB"] <- "Saltsjöbaden"
electiondata["kommun"][electiondata["kommun"] == "OSTERTAL"] <- "Östertelge"
electiondata["kommun"][electiondata["kommun"] == "VASTERTA"] <- "Södertälje LF"
electiondata$kommun[electiondata$kommun == "TVETA" & electiondata$V4 == "219030"] <- "Tveta-Stockholm"
electiondata["kommun"][electiondata["kommun"] == "OVERJARN"] <- "Öfver-Jerna"
electiondata["kommun"][electiondata["kommun"] == "YTTERJAR"] <- "Ytter-Jerna"
electiondata["kommun"][electiondata["kommun"] == "VARDINGE"] <- "Vårdinge"
electiondata["kommun"][electiondata["kommun"] == "TURINGE"] <- "Turinge"



### UPPLAND COUNTY
electiondata["kommun"][electiondata["V4"] == "301010"] <- "Kalmar-Uppland"
electiondata["kommun"][electiondata["kommun"] == "OFVERGRA"] <- "Öfver-Gran"
electiondata["kommun"][electiondata["kommun"] == "YTTERGRA"] <- "Ytter-Gran"
electiondata["kommun"][electiondata["kommun"] == "HAGGEBY"] <- "Häggeby"
electiondata["kommun"][electiondata["kommun"] == "SKOKLOST"] <- "Skokloster"
electiondata["kommun"][electiondata["kommun"] == "HATUNA"] <- "Håtuna"
electiondata["kommun"][electiondata["kommun"] == "HABOTIBB"] <- "Håbo-Tibble"
electiondata["kommun"][electiondata["kommun"] == "BROOCHLO"] <- "Bro och Lossa"
electiondata["kommun"][electiondata["kommun"] == "VASTRARY"] <- "Vestra Ryd-Uppland"
electiondata["kommun"][electiondata["kommun"] == "STOCKHOL" & electiondata$V4 == "302030"] <- "Stockholms-Näs"
electiondata["kommun"][electiondata["kommun"] == "HACKSTA"] <- "Hacksta"
electiondata["kommun"][electiondata["kommun"] == "LOT" & electiondata$V4 == "303020"] <- "Löt-Uppland"
electiondata["kommun"][electiondata["kommun"] == "VECKHOLM"] <- "Veckholm"
electiondata["kommun"][electiondata["kommun"] == "TORSVI"] <- "Torsvi"
electiondata["kommun"][electiondata["kommun"] == "KUNGSHUS"] <- "Kungs-Husby"
electiondata["kommun"][electiondata["kommun"] == "HARKEBER"] <- "Härkeberga"
electiondata["kommun"][electiondata["kommun"] == "LITSLENA"] <- "Litslena"
electiondata["kommun"][electiondata["kommun"] == "HUSBYSJU"] <- "Husby-Sjutolft"
electiondata["kommun"][electiondata["kommun"] == "VILLBERG"] <- "Villberga"
electiondata["kommun"][electiondata["V4"] == "303120"] <- "Lillkyrka-Uppland"
electiondata["kommun"][electiondata["kommun"] == "BOGLOSA"] <- "Boglösa"
electiondata$kommun[electiondata$kommun == "VALLBY" & electiondata$V4 == "303140"] <- "Vallby-Uppland"
electiondata["kommun"][electiondata["kommun"] == "ARNO"] <- "Arnö"
electiondata["kommun"][electiondata["kommun"] == "TILLINGE"] <- "Tillinge"
electiondata["kommun"][electiondata["kommun"] == "SVINNEGA"] <- "Svinnegarn"
electiondata["kommun"][electiondata["kommun"] == "ENKOPNAS"] <- "Enköpings-Näs"
electiondata["kommun"][electiondata["kommun"] == "TEDA"] <- "Teda"
electiondata["kommun"][electiondata["kommun"] == "SPARRSAT"] <- "Sparrsätra"
electiondata["kommun"][electiondata["kommun"] == "BRED"] <- "Bred"
electiondata["kommun"][electiondata["kommun"] == "VARFRUKY"] <- "Vårfrukyrka-Uppland"
electiondata["kommun"][electiondata["kommun"] == "LANGTORA"] <- "Långtora"
electiondata["kommun"][electiondata["kommun"] == "NYASATRA"] <- "Nysätra-Lagunda"
electiondata["kommun"][electiondata["kommun"] == "BISKOPSK"] <- "Biskopskulla"
electiondata["kommun"][electiondata["kommun"] == "FROSLUND"] <- "Fröslunda"
electiondata["kommun"][electiondata["kommun"] == "GIRESTA"] <- "Giresta"
electiondata["kommun"][electiondata["kommun"] == "FITTJA"] <- "Fitja"
electiondata["kommun"][electiondata["kommun"] == "HJALSTA"] <- "Hjelsta"
electiondata["kommun"][electiondata["V4"] == "305100"] <- "Holm-Lagunda"
electiondata["kommun"][electiondata["kommun"] == "KULLA"] <- "Kulla"
electiondata["kommun"][electiondata["kommun"] == "GRYTA"] <- "Gryta"
electiondata["kommun"][electiondata["kommun"] == "BALINGST"] <- "Balingsta"
electiondata["kommun"][electiondata["V4"] == "306030"] <- "Hagby-Uppland"
electiondata["kommun"][electiondata["kommun"] == "RAMSTA"] <- "Ramsta"
electiondata["kommun"][electiondata["kommun"] == "VASTERAK"] <- "Vester-Åker"
electiondata["kommun"][electiondata["V4"] == "306060"] <- "Dalby-Hagunda"
electiondata["kommun"][electiondata["kommun"] == "SKOGSTIB"] <- "Skogs-Tible"
electiondata["kommun"][electiondata["kommun"] == "ALAND"] <- "Åland"
electiondata["kommun"][electiondata["kommun"] == "JARLASA"] <- "Järlåsa"
electiondata["kommun"][electiondata["kommun"] == "BONDKYRK"] <- "Bondkyrka"
electiondata["kommun"][electiondata["kommun"] == "BORJE"] <- "Börje"
electiondata["kommun"][electiondata["kommun"] == "UPPSALAN"] <- "Uppsala-Näs"
electiondata["kommun"][electiondata["V4"] == "307040"] <- "Vänge-Uppland"
electiondata["kommun"][electiondata["kommun"] == "LABY"] <- "Läby"
electiondata["kommun"][electiondata["kommun"] == "JUMKIL"] <- "Jumkil"
electiondata["kommun"][electiondata["kommun"] == "AKERBY"] <- "Åkerby"
electiondata["kommun"][electiondata["kommun"] == "BALINGE"] <- "Bälinge-Uppland"
electiondata["kommun"][electiondata["kommun"] == "SKUTTUNG"] <- "Skuttunge"
electiondata["kommun"][electiondata["kommun"] == "GAMLAUPP"] <- "Gamla Uppsala"
electiondata["kommun"][electiondata["kommun"] == "VAKSALA"] <- "Vaksala"
electiondata["kommun"][electiondata["kommun"] == "DANMARK"] <- "Danmark"
electiondata["kommun"][electiondata["kommun"] == "RASBO"] <- "Rasbo"
electiondata["kommun"][electiondata["kommun"] == "RASBOKIL"] <- "Rasbokil"
electiondata["kommun"][electiondata["kommun"] == "FUNDBO"] <- "Fundbo"
electiondata["kommun"][electiondata["kommun"] == "TENSTA"] <- "Tensta"
electiondata["kommun"][electiondata["kommun"] == "VIKSTA"] <- "Viksta"
electiondata["kommun"][electiondata["kommun"] == "BJORKLIN"] <- "Björklinge"
electiondata["kommun"][electiondata["kommun"] == "ARENTUNA"] <- "Ärentuna"
electiondata["kommun"][electiondata["kommun"] == "LENA" & electiondata$V4 == "311050"] <- "Lena-Norunda"
electiondata["kommun"][electiondata["kommun"] == "VENDEL"] <- "Vendel"
electiondata["kommun"][electiondata["kommun"] == "SODERFOR"] <- "Söderfors"
electiondata["kommun"][electiondata["kommun"] == "TIERP"] <- "Tierp"
electiondata["kommun"][electiondata["kommun"] == "VASTLAND"] <- "Vestland"
electiondata["kommun"][electiondata["kommun"] == "TOLFTA"] <- "Tolfta"
electiondata["kommun"][electiondata["kommun"] == "#LVKARLE"] <- "Elfkarleby"
electiondata["kommun"][electiondata["kommun"] == "SKAFTHAM"] <- "Skefthammar"
electiondata$kommun[electiondata$kommun == "EKEBY" & electiondata$V4 == "313020"] <- "Ekeby-Uppland"
electiondata["kommun"][electiondata["kommun"] == "ALUNDA"] <- "Alunda"
electiondata["kommun"][electiondata["kommun"] == "MORKARLA"] <- "Morkarla"
electiondata$kommun[electiondata$kommun == "TUNA" & electiondata$V4 == "313050"] <- "Tuna-Olands"
electiondata["kommun"][electiondata["kommun"] == "STAVBY"] <- "Stafby"
electiondata["kommun"][electiondata["kommun"] == "DANNEMOR"] <- "Dannemora"
electiondata["kommun"][electiondata["kommun"] == "FILM"] <- "Film"
electiondata["kommun"][electiondata["kommun"] == "TEGELSMO"] <- "Tegelsmora"
electiondata["kommun"][electiondata["kommun"] == "OSTERLOV"] <- "Öster-Löfsta"
electiondata["kommun"][electiondata["kommun"] == "HALLNAS"] <- "Hållnäs"


## SÖDERMANLAND COUNTY
electiondata$kommun[electiondata$kommun == "TUNA" & electiondata$V4 == "401010"] <- "Tuna-Jönåker"
electiondata["kommun"][electiondata["kommun"] == "BERGSHAM"] <- "Bergshammar"
electiondata["kommun"][electiondata["kommun"] == "TUNABERG"] <- "Tunaberg"
electiondata["kommun"][electiondata["V4"] == "401040"] <- "Lunda-Jönåker"
electiondata["kommun"][electiondata["V4"] == "401050"] <- "Kila-Jönåker"
electiondata["kommun"][electiondata["kommun"] == "BJORKVIK"] <- "Björkvik"
electiondata["kommun"][electiondata["kommun"] == "HALLA" & electiondata$V4 == "401070"] <- "Halla-Jönåker"
electiondata["kommun"][electiondata["kommun"] == "STIGTOMT"] <- "Stigtomta"
electiondata["kommun"][electiondata["kommun"] == "NYKYRKA" & electiondata$V4 == "401110"] <- "Nykyrka-Jönåker"
electiondata["kommun"][electiondata["kommun"] == "BAERBO"] <- "Bärbo"
electiondata["kommun"][electiondata["kommun"] == "STNIKOLA"] <- "St Nikolai"
electiondata["kommun"][electiondata["kommun"] == "RIPSA"] <- "Ripsa"
electiondata["kommun"][electiondata["kommun"] == "LID"] <- "Lid"
electiondata["kommun"][electiondata["kommun"] == "RUNTUNA"] <- "Runtuna"
electiondata["kommun"][electiondata["kommun"] == "LUDGO"] <- "Ludgo"
electiondata["kommun"][electiondata["kommun"] == "SPELVIK"] <- "Spelvik"
electiondata["kommun"][electiondata["V4"] == "402060"] <- "Bälinge-Sörmland"
electiondata["kommun"][electiondata["kommun"] == "TYSTBERG"] <- "Tystberga"
electiondata$kommun[electiondata$kommun == "TORSAAKE" & electiondata$V4 == "402100"] <- "Torsåker-Rönö"
electiondata["kommun"][electiondata["kommun"] == "LAESTRIN"] <- "Lästringe"
electiondata["kommun"][electiondata["kommun"] == "SAETERST"] <- "Sätersta"
electiondata["kommun"][electiondata["kommun"] == "BOGSTA"] <- "Bogsta"
electiondata["kommun"][electiondata["kommun"] == "RRABYRO"] <- "Råby-Rönö"
electiondata["kommun"][electiondata["kommun"] == "SVAERTA"] <- "Svärta"
electiondata["kommun"][electiondata["kommun"] == "HELGONA"] <- "Helgona"
electiondata["kommun"][electiondata["kommun"] == "HOELOE"] <- "Hölö"
electiondata["kommun"][electiondata["kommun"] == "MOERKOE"] <- "Mörkö"
electiondata["kommun"][electiondata["V4"] == "403030"] <- "Vesterljung"
electiondata["kommun"][electiondata["kommun"] == "TROSALK"] <- "Trosa LF"
electiondata["kommun"][electiondata["kommun"] == "VAGNHAER"] <- "Vagnhärad"
electiondata["kommun"][electiondata["kommun"] == "VVINGAAK"] <- "Vestra Vingåker"
electiondata["kommun"][electiondata["kommun"] == "OEVINGAA"] <- "Östra Vingåker"
electiondata["kommun"][electiondata["kommun"] == "JULITA"] <- "Julita"
electiondata["kommun"][electiondata["kommun"] == "OESTERAA"] <- "Österåker-Oppunda"
electiondata["kommun"][electiondata["kommun"] == "STORAMAL"] <- "Stora Malm"
electiondata["kommun"][electiondata["kommun"] == "LERBO"] <- "Lerbo"
electiondata["kommun"][electiondata["kommun"] == "FLODA" & electiondata$V4 == "404070"] <- "Floda-Oppunda"
electiondata["kommun"][electiondata["kommun"] == "SKYLLING"] <- "Skyllinge"
electiondata["kommun"][electiondata["V4"] == "404110"] <- "Blacksta-Sörmland"
electiondata["kommun"][electiondata["kommun"] == "VADSBRO"] <- "Vadsbro"
electiondata["kommun"][electiondata["kommun"] == "HUSBYOPP"] <- "Husby-Oppunda"
electiondata["kommun"][electiondata["kommun"] == "BETTNA"] <- "Bettna"
electiondata["kommun"][electiondata["kommun"] == "VRENA"] <- "Vrena"
electiondata["kommun"][electiondata["kommun"] == "HELGESTA"] <- "Helgesta"
electiondata["kommun"][electiondata["kommun"] == "HYLTINGE"] <- "Hyltinge"
electiondata["kommun"][electiondata["kommun"] == "DUNKER"] <- "Dunker"
electiondata["kommun"][electiondata["kommun"] == "LILLAMAL"] <- "Lilla Malma"
electiondata["kommun"][electiondata["kommun"] == "AARDALA"] <- "Årdala"
electiondata["kommun"][electiondata["kommun"] == "FORSA"  & electiondata$V4 == "405070"] <- "Forsa-Villåttinge"
electiondata["kommun"][electiondata["kommun"] == "MALMKOEP"] <- "Malmköping"
electiondata["kommun"][electiondata["kommun"] == "LILLAMEL"] <- "Lilla Mellösa"
electiondata["kommun"][electiondata["kommun"] == "FLEN"] <- "Flen"
electiondata["kommun"][electiondata["V4"] == "406010"] <- "Torshälla LF"
electiondata["kommun"][electiondata["V4"] == "406020"] <- "Gillberga-Sörmland"
electiondata["kommun"][electiondata["kommun"] == "LISTA"] <- "Lista"
electiondata["kommun"][electiondata["kommun"] == "TUMBO"] <- "Tumbo"
electiondata["kommun"][electiondata["kommun"] == "RABYREKA"] <- "Råby-Rekarne"
electiondata["kommun"][electiondata["kommun"] == "OJA"] <- "Öja-Rekarne"
electiondata["kommun"][electiondata["kommun"] == "VASTERMO"] <- "Vestermo"
electiondata["kommun"][electiondata["kommun"] == "JADER"] <- "Jäder"
electiondata["kommun"][electiondata["kommun"] == "BARFVA"] <- "Barfva"
electiondata["kommun"][electiondata["kommun"] == "KJULA"] <- "Kjula"
electiondata$kommun[electiondata$V4 == "407040"] <- "Sundby"
electiondata$kommun[electiondata$kommun == "VALLBY" & electiondata$V4 == "407050"] <- "Vallby-Rekarne"
electiondata$kommun[electiondata$V4 == "407060"] <- "Hammarby-Rekarne"
electiondata["kommun"][electiondata["kommun"] == "STENKVIS"] <- "Stenkvista"
electiondata["kommun"][electiondata["kommun"] == "ARLA"] <- "Ärla"
electiondata["kommun"][electiondata["kommun"] == "HUSBYREK"] <- "Husby-Rekarne"
electiondata["kommun"][electiondata["kommun"] == "HASHULTA"] <- "Näshulta"
electiondata["kommun"][electiondata["kommun"] == "GAASINGE"] <- "Gåsinge"
electiondata["kommun"][electiondata["kommun"] == "DILLNAES"] <- "Dillnäs"
electiondata["kommun"][electiondata["kommun"] == "FRUSTUNA"] <- "Frustuna"
electiondata["kommun"][electiondata["kommun"] == "KATTNAES"] <- "Kattnäs"
electiondata["kommun"][electiondata["kommun"] == "BJOERNLU"] <- "Björnlunda"
electiondata$kommun[electiondata$V4 == "408060"] <- "Gryt-Sörmland"
electiondata["kommun"][electiondata["kommun"] == "AKER"] <- "Åker-Sörmland"
electiondata$kommun[electiondata$V4 == "409020"] <- "Länna-Sörmland"
electiondata["kommun"][electiondata["kommun"] == "VANSO"] <- "Vansö"
electiondata["kommun"][electiondata["kommun"] == "HARAD"] <- "Härad"
electiondata["kommun"][electiondata["kommun"] == "FOGDO"] <- "Fogdö"
electiondata["kommun"][electiondata["kommun"] == "HELGARO"] <- "Helgarö"
electiondata["kommun"][electiondata["kommun"] == "STRANGLK"] <- "Strengnäs LF"
electiondata["kommun"][electiondata["kommun"] == "TORESUND"] <- "Toresund"
electiondata["kommun"][electiondata["kommun"] == "OVERSEL0"] <- "Öfver-Selö"
electiondata["kommun"][electiondata["kommun"] == "YTTERSEL"] <- "Ytter-Selö"
electiondata["kommun"][electiondata["kommun"] == "ASPO"] <- "Aspö-Sörmland"
electiondata["kommun"][electiondata["kommun"] == "KARNBO"] <- "Kärnbo"
electiondata["kommun"][electiondata["kommun"] == "TAXINGE"] <- "Taxinge"
electiondata["kommun"][electiondata["kommun"] == "OVERENHO"] <- "Öfver-Enhörna"
electiondata["kommun"][electiondata["kommun"] == "YTTERENH"] <- "Ytter-Enhörna"


## ÖSTERGÖTLAND COUNTY
electiondata$kommun[electiondata$kommun == "HORN" & electiondata$V4 == "501010"] <- "Horn-Kinda"
electiondata["kommun"][electiondata["kommun"] == "HYCKLING"] <- "Hycklinge"
electiondata["kommun"][electiondata["kommun"] == "TIRSERUM"] <- "Tirserum"
electiondata["kommun"][electiondata["kommun"] == "VENEBY"] <- "Vestra Eneby"
electiondata["kommun"][electiondata["kommun"] == "KISA"] <- "Kisa"
electiondata["kommun"][electiondata["kommun"] == "HAEGERST"] <- "Hägerstad"
electiondata["kommun"][electiondata["kommun"] == "OPPEBY"] <- "Oppeby"
electiondata["kommun"][electiondata["kommun"] == "KAETTILS"] <- "Kettilstad"
electiondata["kommun"][electiondata["kommun"] == "TJAERSTA"] <- "Tjärstad"
electiondata["kommun"][electiondata["kommun"] == "VAARDNAE"] <- "Vårdnäs"
electiondata["kommun"][electiondata["kommun"] == "VRYD"] <- "Vestra Ryd-Ydre"
electiondata["kommun"][electiondata["kommun"] == "SVINHULT"] <- "Svinhult"
electiondata["kommun"][electiondata["kommun"] == "SUND"] <- "Sund"
electiondata["kommun"][electiondata["kommun"] == "ASBY"] <- "Asby"
electiondata$kommun[electiondata$kommun == "TORPA" & electiondata$V4 == "502050"] <- "Torpa-Ydre"
electiondata["kommun"][electiondata["kommun"] == "NORRAVI"] <- "Norra Vi"
electiondata["kommun"][electiondata["kommun"] == "VHARG"] <- "Vestra Harg"
electiondata["kommun"][electiondata["kommun"] == "OETOLLST"] <- "Östra Tollstad"
electiondata["kommun"][electiondata["kommun"] == "SYA"] <- "Sya"
electiondata["kommun"][electiondata["kommun"] == "VETA"] <- "Veta"
electiondata$kommun[electiondata$kommun == "VIBY" & electiondata$V4 == "503050"] <- "Viby-Vifolka"
electiondata["kommun"][electiondata["kommun"] == "NORMLOES"] <- "Normlösa"
electiondata["kommun"][electiondata["kommun"] == "HAERBERG"] <- "Härberga"
electiondata["kommun"][electiondata["kommun"] == "VAESTERL"] <- "Vesterlösa"
electiondata["kommun"][electiondata["kommun"] == "NYKIL"] <- "Nykil"
electiondata["kommun"][electiondata["kommun"] == "GAMMALKI"] <- "Gammalkil"
electiondata["kommun"][electiondata["kommun"] == "ULRIKA"] <- "Ulrika"
electiondata["kommun"][electiondata["kommun"] == "RAPPESTD"] <- "Rappestad"
electiondata["kommun"][electiondata["kommun"] == "SJOEGEST"] <- "Sjögestad"
electiondata["kommun"][electiondata["kommun"] == "VIKINGST"] <- "Vikingstad"
electiondata["kommun"][electiondata["kommun"] == "LEDEBERG"] <- "Ledeberg"
electiondata["kommun"][electiondata["kommun"] == "VRETAKLO"] <- "Vreta kloster"
electiondata["kommun"][electiondata["kommun"] == "STJAERNO"] <- "Stjernorp"
electiondata["kommun"][electiondata["kommun"] == "LJUNG" & electiondata$V4 == "505030"] <- "Ljung-ÖG"
electiondata["kommun"][electiondata["kommun"] == "FLISTAD" & electiondata$V4 == "505040"] <- "Flistad-ÖG"
electiondata["kommun"][electiondata["kommun"] == "BJOERKEB"] <- "Björkeberg"
electiondata["kommun"][electiondata["kommun"] == "OESKRUKE"] <- "Östra Skrukeby"
electiondata["kommun"][electiondata["V4"] == "506020"] <- "Lillkyrka-ÖG"
electiondata["kommun"][electiondata["kommun"] == "TOERNEVA"] <- "Törnevalla"
electiondata["kommun"][electiondata["kommun"] == "OEHARG"] <- "Östra Harg"
electiondata["kommun"][electiondata["kommun"] == "RYSTAD"] <- "Rystad"
electiondata["kommun"][electiondata["kommun"] == "VAARDSBE"] <- "Vårdsberg"
electiondata["kommun"][electiondata["kommun"] == "ASKEBY"] <- "Askeby"
electiondata["kommun"][electiondata["kommun"] == "BANKEKIN"] <- "Bankekind"
electiondata["kommun"][electiondata["kommun"] == "GREBO"] <- "Grebo"
electiondata["kommun"][electiondata["kommun"] == "VAERNA"] <- "Värna"
electiondata["kommun"][electiondata["kommun"] == "OERTOMTA"] <- "Örtomta"
electiondata["kommun"][electiondata["kommun"] == "BJOERSAE"] <- "Björsäter-Bankekind"
electiondata["kommun"][electiondata["kommun"] == "AATVID"] <- "Åtvid"
electiondata["kommun"][electiondata["kommun"] == "SLAKA"] <- "Slaka"
electiondata["kommun"][electiondata["kommun"] == "SKEDA"] <- "Skeda"
electiondata["kommun"][electiondata["kommun"] == "KAERNA"] <- "Kärna"
electiondata["kommun"][electiondata["kommun"] == "KAGA"] <- "Kaga"
electiondata["kommun"][electiondata["kommun"] == "LANDERYD"] <- "Landeryd"
electiondata$kommun[electiondata$kommun == "VIST" & electiondata$V4 == "508060"] <- "Vist-Hanekind"
electiondata["kommun"][electiondata["kommun"] == "VHUSBY"] <- "Vestra Husby"
electiondata["kommun"][electiondata["kommun"] == "DROTHEM"] <- "Drothem"
electiondata["kommun"][electiondata["kommun"] == "SKOENBER"] <- "Skönberga"
electiondata["kommun"][electiondata["kommun"] == "RINGARUM"] <- "Ringarum"
electiondata["kommun"][electiondata["kommun"] == "MOGATA"] <- "Mogata"
electiondata["kommun"][electiondata["kommun"] == "BOERRUM"] <- "Börrum"
electiondata["kommun"][electiondata["V4"] == "509070"] <- "Gryt-ÖG"
electiondata["kommun"][electiondata["kommun"] == "SKAELLVI"] <- "Skällvik"
electiondata["kommun"][electiondata["kommun"] == "STANNA"] <- "St Anna"
electiondata["kommun"][electiondata["kommun"] == "SKAERKIN"] <- "Skärkind"
electiondata["kommun"][electiondata["kommun"] == "GISTAD"] <- "Gistad"
electiondata["kommun"][electiondata["kommun"] == "GAARDEBY"] <- "Gårdeby"
electiondata["kommun"][electiondata["kommun"] == "OESTRARY"] <- "Östra Ryd-Skärkind"
electiondata["kommun"][electiondata["kommun"] == "YXNERUM"] <- "Yxnerum"
electiondata["kommun"][electiondata["kommun"] == "GAARDEGA"] <- "Godegård"
electiondata["kommun"][electiondata["kommun"] == "TJAELLMO"] <- "Tjällmo"
electiondata$kommun[electiondata$kommun == "HAELLEST" & electiondata$V4 == "511030"] <- "Hellestad-ÖG"
electiondata["kommun"][electiondata["kommun"] == "RISINGE"] <- "Risinge"
electiondata["kommun"][electiondata["kommun"] == "REGNA"] <- "Regna"
electiondata["kommun"][electiondata["kommun"] == "SKEDEVI"] <- "Skedevi"
electiondata["kommun"][electiondata["V4"] == "511070"] <- "Vånga-ÖG"
electiondata["kommun"][electiondata["kommun"] == "KUDDBY"] <- "Kuddby"
electiondata["kommun"][electiondata["kommun"] == "OESTRANY"] <- "Östra Ny"
electiondata["kommun"][electiondata["kommun"] == "ROENOE"] <- "Rönö"
electiondata["kommun"][electiondata["kommun"] == "AA"] <- "Å"
electiondata["kommun"][electiondata["kommun"] == "TAABY"] <- "Tåby"
electiondata["kommun"][electiondata["kommun"] == "KONUNGSU"] <- "Konungsund"
electiondata["kommun"][electiondata["kommun"] == "HAERADSH"] <- "Häradshammar"
electiondata["kommun"][electiondata["kommun"] == "JONSBERG"] <- "Jonsberg"
electiondata["kommun"][electiondata["kommun"] == "OEHUSBY"] <- "Östra Husby"
electiondata["kommun"][electiondata["kommun"] == "KVARSEBO"] <- "Kvarsebo"
electiondata["kommun"][electiondata["kommun"] == "OESTENBY"] <- "Östra Stenby"
electiondata["kommun"][electiondata["kommun"] == "STYRESTA"] <- "Styrestad"
electiondata["kommun"][electiondata["kommun"] == "DAGSBERG"] <- "Dagsberg"
electiondata["kommun"][electiondata["kommun"] == "KROKEK"] <- "Krokek"
electiondata["kommun"][electiondata["kommun"] == "TINGSTAD"] <- "Tingstad"
electiondata["kommun"][electiondata["kommun"] == "FURINGST"] <- "Furingstad"
electiondata["kommun"][electiondata["kommun"] == "KVILLING"] <- "Kvillinge"
electiondata["kommun"][electiondata["kommun"] == "SIMONSTO"] <- "Simonstorp"
electiondata["kommun"][electiondata["kommun"] == "KIMSTAD"] <- "Kimstad"
electiondata["kommun"][electiondata["kommun"] == "KULLERST"] <- "Kullerstad"
electiondata["kommun"][electiondata["kommun"] == "BORG"] <- "Borg"
electiondata["kommun"][electiondata["kommun"] == "SVANHALS"] <- "Svanhals"
electiondata["kommun"][electiondata["kommun"] == "KUMLA" & electiondata$V4 == "517020"] <- "Kumla-Lysing"
electiondata["kommun"][electiondata["kommun"] == "R@K"] <- "Rök"
electiondata["kommun"][electiondata["kommun"] == "HEDA"] <- "Heda"
electiondata["kommun"][electiondata["kommun"] == "STORAAAB"] <- "Stora Åby"
electiondata["kommun"][electiondata["kommun"] == "OEDESHOE"] <- "Ödeshög"
electiondata["kommun"][electiondata["kommun"] == "TREHOERN" & electiondata$V4 == "517070"] <- "Trehörna"
electiondata["kommun"][electiondata["kommun"] == "VTOLLSTA"] <- "Vestra Tollstad"
electiondata$kommun[electiondata$kommun == "EKEBY" & electiondata$V4 == "518010"] <- "Ekeby-ÖG"
electiondata["kommun"][electiondata["kommun"] == "BLAAVIK"] <- "Blåvik"
electiondata["kommun"][electiondata["kommun"] == "RINNA"] <- "Rinna"
electiondata["kommun"][electiondata["kommun"] == "AASBO"] <- "Åsbo"
electiondata["kommun"][electiondata["kommun"] == "MALEXAND"] <- "Malexander"
electiondata["kommun"][electiondata["V4"] == "518060"] <- "Högby-Göstring"
electiondata["kommun"][electiondata["kommun"] == "HOGSTAD"] <- "Hogstad"
electiondata["kommun"][electiondata["kommun"] == "JAERSTAD"] <- "Jerstad"
electiondata["kommun"][electiondata["kommun"] == "ALLHELGO"] <- "Allhelgona"
electiondata["kommun"][electiondata["kommun"] == "BJAELBO"] <- "Bjälbo"
electiondata["kommun"][electiondata["kommun"] == "VAEDERST"] <- "Väderstad"
electiondata$kommun[electiondata$kommun == "HOV" & electiondata$V4 == "518140"] <- "Hov-Göstring"
electiondata["kommun"][electiondata["kommun"] == "APPUNDA"] <- "Appuna"
electiondata["kommun"][electiondata["kommun"] == "VSTENBY"] <- "Vestra Stenby"
electiondata["kommun"][electiondata["kommun"] == "HAGEBYHO"] <- "Hagebyhöga"
electiondata["kommun"][electiondata["kommun"] == "FIFVELST"] <- "Fifvelstad"
electiondata["kommun"][electiondata["kommun"] == "ORLUNDA"] <- "Orlunda"
electiondata["kommun"][electiondata["V4"] == "519050"] <- "Varv-Aska"
electiondata["kommun"][electiondata["kommun"] == "STYRA"] <- "Styra"
electiondata$kommun[electiondata$kommun == "ASK" & electiondata$V4 == "519070"] <- "Ask-Aska"
electiondata["kommun"][electiondata["kommun"] == "VINNERST"] <- "Vinnerstad"
electiondata["kommun"][electiondata["kommun"] == "MOTALALK"] <- "Motala LF"
electiondata["kommun"][electiondata["kommun"] == "VNY"] <- "Vestra Ny"
electiondata["kommun"][electiondata["kommun"] == "ROGLOES"] <- "Rogslösa"
electiondata["kommun"][electiondata["kommun"] == "VAEVERSU"] <- "Väfversunda"
electiondata["kommun"][electiondata["kommun"] == "HERRESTA" & electiondata$V4 == "520030"] <- "Herrestad-Dal"
electiondata["kommun"][electiondata["kommun"] == "KAELLSTA"] <- "Källstad"
electiondata["kommun"][electiondata["kommun"] == "STPER"] <- "St Per-Dal"
electiondata["kommun"][electiondata["kommun"] == "STRAA"] <- "Strå"
electiondata["kommun"][electiondata["kommun"] == "OERBERGA"] <- "Örberga"
electiondata["kommun"][electiondata["kommun"] == "NAESSJA"] <- "Nässja"
electiondata["kommun"][electiondata["kommun"] == "KLOCKRIK"] <- "Klockrike"
electiondata["kommun"][electiondata["kommun"] == "BRUNNEBY"] <- "Brunneby"
electiondata["kommun"][electiondata["kommun"] == "SKEPPSAA"] <- "Skeppsås"
electiondata["kommun"][electiondata["kommun"] == "AELVESTA"] <- "Elfvestad"
electiondata["kommun"][electiondata["kommun"] == "VALLERST"] <- "Vallerstad"
electiondata["kommun"][electiondata["kommun"] == "FORNAASA"] <- "Fornåsa"
electiondata["kommun"][electiondata["kommun"] == "LOENSAAS"] <- "Lönsås"
electiondata["kommun"][electiondata["kommun"] == "EKEBYBOR"] <- "Ekebyborna"
electiondata["kommun"][electiondata["kommun"] == "KRISTBER"] <- "Kristberg"


## JÖNKÖPING COUNTY
electiondata["kommun"][electiondata["kommun"] == "SVARTTOR"] <- "Svarttorp"
electiondata["kommun"][electiondata["kommun"] == "LEKERYD"] <- "Lekeryd"
electiondata["kommun"][electiondata["kommun"] == "JAERSNAE"] <- "Jersnäs"
electiondata["kommun"][electiondata["kommun"] == "FORSERUM"] <- "Forserum"
electiondata["kommun"][electiondata["kommun"] == "BARKERYD"] <- "Barkeryd"
electiondata["kommun"][electiondata["kommun"] == "JAERSTOR"] <- "Jerstorp"
electiondata["kommun"][electiondata["kommun"] == "BANKERYD"] <- "Bankeryd"
electiondata["kommun"][electiondata["kommun"] == "ROGBERGA"] <- "Rogberga"
electiondata["kommun"][electiondata["kommun"] == "OEGGESTO"] <- "Öggestorp"
electiondata["kommun"][electiondata["kommun"] == "BARNARP"] <- "Barnarp"
electiondata["kommun"][electiondata["kommun"] == "MAANSARP"] <- "Månsarp"
electiondata["kommun"][electiondata["kommun"] == "SANDERYD"] <- "Sandseryd"
electiondata["kommun"][electiondata["kommun"] == "HAKARP"] <- "Hakarp"
electiondata["kommun"][electiondata["kommun"] == "NAESSJOE"] <- "Nässjö"
electiondata["kommun"][electiondata["kommun"] == "VISINGSO"] <- "Visingsö"
electiondata["kommun"][electiondata["kommun"] == "GRAENNAL"] <- "Grenna LF"
electiondata["kommun"][electiondata["kommun"] == "SKAERSTA"] <- "Skärstad"
electiondata["kommun"][electiondata["kommun"] == "OELMESTA"] <- "Ölmestad"
electiondata["kommun"][electiondata["kommun"] == "BOTTNARY"] <- "Bottnaryd"
electiondata["kommun"][electiondata["kommun"] == "MULSERYD"] <- "Mulseryd"
electiondata["kommun"][electiondata["kommun"] == "ANGERDSH"] <- "Angerdshestra"
electiondata["kommun"][electiondata["kommun"] == "STENGAAR"] <- "Stengårdshult"
electiondata["kommun"][electiondata["kommun"] == "NUNNARYD"] <- "Norra Unnaryd"
electiondata["kommun"][electiondata["kommun"] == "VALDSHUL"] <- "Valdshult"
electiondata["kommun"][electiondata["kommun"] == "OERERYD"] <- "Öreryd"
electiondata["kommun"][electiondata["kommun"] == "NHESTRA"] <- "Norra Hestra"
electiondata["kommun"][electiondata["kommun"] == "BONSTORP"] <- "Bonstorp"
electiondata["kommun"][electiondata["kommun"] == "AASENHO"] <- "Åsenhöga"
electiondata["kommun"][electiondata["kommun"] == "KAELLERY"] <- "Källeryd"
electiondata["kommun"][electiondata["kommun"] == "LOMMARYD"] <- "Lommaryd"
electiondata["kommun"][electiondata["kommun"] == "BAELARYD"] <- "Bälaryd"
electiondata["kommun"][electiondata["kommun"] == "FINNARYD"] <- "Frinnaryd"
electiondata["kommun"][electiondata["kommun"] == "ADELOEV"] <- "Adelöv"
electiondata["kommun"][electiondata["kommun"] == "VIREDA"] <- "Vireda"
electiondata["kommun"][electiondata["kommun"] == "HAURIDA"] <- "Hagrida"
electiondata["kommun"][electiondata["kommun"] == "ASKERYD"] <- "Askeryd"
electiondata["kommun"][electiondata["kommun"] == "BREDESTA"] <- "Bredestad"
electiondata$kommun[electiondata$kommun == "MARBAECK" & electiondata$V4 == "604110"] <- "Marbäck-Jkpg"
electiondata["kommun"][electiondata["kommun"] == "LINDERAA"] <- "Linderås"
electiondata$kommun[electiondata$kommun == "SAEBY" & electiondata$V4 == "604130"] <- "Säby-Jkpg"
electiondata["kommun"][electiondata["kommun"] == "INGATORP"] <- "Ingatorp"
electiondata["kommun"][electiondata["kommun"] == "BELLOE"] <- "Bellö"
electiondata["kommun"][electiondata["kommun"] == "HAESSELB"] <- "Häsleby"
electiondata["kommun"][electiondata["kommun"] == "HULT"] <- "Hult"
electiondata["kommun"][electiondata["kommun"] == "EDSHULT"] <- "Edshult"
electiondata["kommun"][electiondata["kommun"] == "HOEREDA"] <- "Höreda"
electiondata["kommun"][electiondata["V4"] == "605070"] <- "Mellby-Jkpg"
electiondata["kommun"][electiondata["kommun"] == "EKSJOELK"] <- "Eksjö LF"
electiondata["kommun"][electiondata["kommun"] == "FLISBY"] <- "Flisby"
electiondata["kommun"][electiondata["kommun"] == "NSOLBERG"] <- "Norra Solberga"
electiondata["kommun"][electiondata["kommun"] == "VETLANDA"] <- "Vetlanda"
electiondata["kommun"][electiondata["kommun"] == "BJOERKOE"] <- "Björkö"
electiondata["kommun"][electiondata["kommun"] == "NAEVELSJ"] <- "Näfvelsjö"
electiondata["kommun"][electiondata["kommun"] == "KARLSTOR"] <- "Karlstorp"
electiondata["kommun"][electiondata["kommun"] == "KRAAKSHU"] <- "Kråkshult"
electiondata["kommun"][electiondata["kommun"] == "ALSEDA"] <- "Alseda"
electiondata["kommun"][electiondata["kommun"] == "SKEDE"] <- "Skede"
electiondata["kommun"][electiondata["kommun"] == "OEKNA"] <- "Ökna"
electiondata["kommun"][electiondata["kommun"] == "SKIROE"] <- "Skirö"
electiondata["kommun"][electiondata["kommun"] == "NYE"] <- "Nye"
electiondata["kommun"][electiondata["kommun"] == "NAESHULT"] <- "Näshult"
electiondata["kommun"][electiondata["kommun"] == "STENBERG"] <- "Stenberga"
electiondata["kommun"][electiondata["V4"] == "606150"] <- "Korsberga-Jkpg"
electiondata["kommun"][electiondata["kommun"] == "LEMNHULT"] <- "Lemnhult"
electiondata["kommun"][electiondata["kommun"] == "BAECKSED"] <- "Bäckseda"
electiondata["kommun"][electiondata["V4"] == "606200"] <- "Näsby-Jkpg"
electiondata["kommun"][electiondata["kommun"] == "MYRESJOE"] <- "Myresjö"
electiondata["kommun"][electiondata["kommun"] == "LANNASKE"] <- "Lannaskede"
electiondata["kommun"][electiondata["kommun"] == "NSANDSJO"] <- "Norra Sandsjö"
electiondata["kommun"][electiondata["kommun"] == "VALLSJOE"] <- "Vallsjö"
electiondata["kommun"][electiondata["kommun"] == "FROERYD"] <- "Fröryd"
electiondata["kommun"][electiondata["kommun"] == "BAECKABY"] <- "Bäckaby"
electiondata["kommun"][electiondata["kommun"] == "RAMKVILL"] <- "Ramkvilla"
electiondata["kommun"][electiondata["kommun"] == "SSOLBERG"] <- "Södra Solberga"
electiondata["kommun"][electiondata["kommun"] == "HULTSJOE"] <- "Hultsjö"
electiondata["kommun"][electiondata["kommun"] == "SKEPPERS"] <- "Skepperstad"
electiondata["kommun"][electiondata["kommun"] == "HJAERTLA"] <- "Hjertlanda"
electiondata["kommun"][electiondata["kommun"] == "HJAELMSE"] <- "Hjelmseryd"
electiondata["kommun"][electiondata["kommun"] == "STOCKARY"] <-  "Stockaryd"
electiondata["kommun"][electiondata["kommun"] == "VRIGSTAD"] <- "Vrigstad"
electiondata["kommun"][electiondata["kommun"] == "NYDALA"] <- "Nydala"
electiondata["kommun"][electiondata["kommun"] == "SVENARUM"] <- "Svennarum"
electiondata["kommun"][electiondata["kommun"] == "MALMBAEC"] <- "Malmbäck"
electiondata["kommun"][electiondata["kommun"] == "OEDESTUG"] <- "Ödestuga"
electiondata["kommun"][electiondata["kommun"] == "ALMESAAK"] <- "Almesåkra"
electiondata["kommun"][electiondata["kommun"] == "BRINGETO"] <- "Bringetofta"
electiondata["kommun"][electiondata["kommun"] == "NLJUNGA"] <- "Norra Ljunga"
electiondata["kommun"][electiondata["kommun"] == "HYLLETOF"] <- "Hylletofta"
electiondata["kommun"][electiondata["kommun"] == "TOFTERYD"] <- "Tofteryd"
electiondata["kommun"][electiondata["kommun"] == "BYARUM"] <- "Byarum"
electiondata["kommun"][electiondata["kommun"] == "FRYELE"] <- "Fryele"
electiondata["kommun"][electiondata["kommun"] == "HAGSHULT"] <- "Hagshult"
electiondata["kommun"][electiondata["kommun"] == "RYDAHOLM"] <- "Rydaholm"
electiondata["kommun"][electiondata["kommun"] == "GAELLARY"] <- "Gällaryd"
electiondata["kommun"][electiondata["V4"] == "608270"] <- "Vernamo LF"
electiondata$kommun[electiondata$kommun == "VAAXTORP" & electiondata$V4 == "608100"] <- "Våxtorp-Östbo"
electiondata["kommun"][electiondata["kommun"] == "TAANNOE"] <- "Tånnö"
electiondata["kommun"][electiondata["kommun"] == "KAERDA"] <-  "Kärda"
electiondata["kommun"][electiondata["kommun"] == "HAANGER"] <- "Hånger"
electiondata["kommun"][electiondata["kommun"] == "AAKER"] <- "Åker-Jkpg"
electiondata["kommun"][electiondata["kommun"] == "BURSERYD"] <- "Burseryd"
electiondata["kommun"][electiondata["kommun"] == "KAEFSJOE"] <- "Kävsjö"
electiondata["kommun"][electiondata["kommun"] == "SUNNARYD"] <- "Södra Unnaryd"
electiondata["kommun"][electiondata["kommun"] == "JAELLUNT"] <- "Jäluntofta"
electiondata["kommun"][electiondata["kommun"] == "FEMSJOE"] <- "Femsjö"
electiondata["kommun"][electiondata["kommun"] == "LAANGARY"] <- "Långaryd"
electiondata["kommun"][electiondata["kommun"] == "FAERGARY"] <- "Färgaryd"
electiondata["kommun"][electiondata["kommun"] == "SHESTRA"] <- "Södra Hestra"
electiondata["kommun"][electiondata["kommun"] == "GRYTERYD"] <- "Gryteryd"
electiondata["kommun"][electiondata["V4"] == "609110"] <- "Sandvik"
electiondata["kommun"][electiondata["kommun"] == "BOSEBO"] <- "Bosebo"
electiondata["kommun"][electiondata["kommun"] == "VILLSTAD"] <- "Villstad"
electiondata["kommun"][electiondata["kommun"] == "BAARARYD"] <- "Båraryd"
electiondata["kommun"][electiondata["kommun"] == "VAATHULT"] <- "Våthult"
electiondata["kommun"][electiondata["kommun"] == "REFTELE"] <- "Reftele"
electiondata["kommun"][electiondata["kommun"] == "ANDERSTO"] <- "Anderstorp"
electiondata["kommun"][electiondata["kommun"] == "KULLTORP"] <- "Kulltorp"
electiondata["kommun"][electiondata["kommun"] == "GNOSJOE"] <- "Gnosjö"
electiondata["kommun"][electiondata["kommun"] == "FORSHEDA"] <- "Forsheda"
electiondata["kommun"][electiondata["kommun"] == "BREDARYD"] <- "Bredaryd"
electiondata["kommun"][electiondata["kommun"] == "TORSKING"] <- "Torskinge"
electiondata$kommun[electiondata$kommun == "AAS" & electiondata$V4 == "609250"] <- "Ås-Jkpg"
electiondata["kommun"][electiondata["kommun"] == "KAALLERS"] <- "Kållerstad"
electiondata["kommun"][electiondata["kommun"] == "BOLMSOE"] <- "Bolmsö"
electiondata["kommun"][electiondata["kommun"] == "DANNAES"] <- "Dannäs"
electiondata["kommun"][electiondata["kommun"] == "TANNAAKE"] <- "Tannåker"


## KRONOBERG
electiondata["kommun"][electiondata["kommun"] == "HOVMANST"] <- "Hofmantorp"
electiondata["kommun"][electiondata["kommun"] == "FURUBY"] <- "Furuby"
electiondata["kommun"][electiondata["kommun"] == "HEMMESJO"] <- "Hemmesjö"
electiondata["kommun"][electiondata["kommun"] == "TEGNABY"] <- "Tegnaby"
electiondata["kommun"][electiondata["V4"] == "701050"] <- "Växjö LF"
electiondata["kommun"][electiondata["kommun"] == "NOEBBELE"] <- "Nöbbele"
electiondata["kommun"][electiondata["kommun"] == "OETORSAA"] <- "Östra Torsås"
electiondata["kommun"][electiondata["kommun"] == "LAANGASJ"] <- "Långasjö"
electiondata["kommun"][electiondata["kommun"] == "LJUDER"] <-  "Ljuder"
electiondata["kommun"][electiondata["kommun"] == "AELMEBOD"] <- "Elmeboda"
electiondata["kommun"][electiondata["kommun"] == "LINNERYD"] <- "Linneryd"
electiondata["kommun"][electiondata["kommun"] == "SSANDSJO"] <- "Södra Sandsjö"
electiondata["kommun"][electiondata["kommun"] == "VAECKELS"] <-  "Väckelsång"
electiondata["kommun"][electiondata["kommun"] == "TINGSAAS"] <- "Tingsås"
electiondata["kommun"][electiondata["kommun"] == "URAASA"] <- "Uråsa"
electiondata["kommun"][electiondata["kommun"] == "AASEDA"] <- "Åseda"
electiondata["kommun"][electiondata["kommun"] == "AELGHULT"] <- "Elghult"
electiondata["kommun"][electiondata["kommun"] == "HAELLEBE"] <- "Helleberga"
electiondata["kommun"][electiondata["kommun"] == "ALGUTSBO"] <- "Algutsboda"
electiondata["kommun"][electiondata["kommun"] == "LENHOVDA"] <- "Lenhofda"
electiondata["kommun"][electiondata["kommun"] == "EKEBERGA"] <- "Ekebergs"
electiondata["kommun"][electiondata["kommun"] == "DAEDESJO"] <- "Dädesjö"
electiondata["kommun"][electiondata["kommun"] == "HERRAAKR"] <- "Herråkra"
electiondata["kommun"][electiondata["kommun"] == "SJOESAAS"] <- "Sjösås"
electiondata["kommun"][electiondata["kommun"] == "DREV"] <- "Dref"
electiondata["kommun"][electiondata["kommun"] == "HORNARYD"] <- "Hornaryd"
electiondata["kommun"][electiondata["kommun"] == "NOTTEGRA"] <- "Nottebäck"
electiondata["kommun"][electiondata["kommun"] == "OEJABY"] <- "Öjaby"
electiondata["kommun"][electiondata["kommun"] == "BERGUNDA"] <- "Bergunda"
electiondata$kommun[electiondata$kommun == "OEJA" & electiondata$V4 == "703030"] <- "Öja-Kinnevalds"
electiondata["kommun"][electiondata["kommun"] == "VEDERSLO"] <- "Vederslöf"
electiondata["kommun"][electiondata["kommun"] == "DAENNING"] <- "Dänningelanda"
electiondata["kommun"][electiondata["V4"] == "703060"] <- "Skatelöv-Kinnevalds"
electiondata["kommun"][electiondata["kommun"] == "TAEVELSA"] <- "Täfvelsås"
electiondata["kommun"][electiondata["kommun"] == "KALVSVIK"] <- "Kalfsvik"
electiondata["kommun"][electiondata["kommun"] == "JAET"] <- "Jät"
electiondata["kommun"][electiondata["kommun"] == "URSHULT"] <- "Urshult"
electiondata["kommun"][electiondata["kommun"] == "ALMUNDSR"] <- "Almundsryd"
electiondata["kommun"][electiondata["V4"] == "704010"] <- "Berg-Norrvidinge"
electiondata["kommun"][electiondata["kommun"] == "ORMESBER"] <- "Ormesberga"
electiondata["kommun"][electiondata["kommun"] == "ANEBODA"] <- "Aneboda"
electiondata["kommun"][electiondata["kommun"] == "TOLG"] <- "Tolg"
electiondata["kommun"][electiondata["kommun"] == "TJUREDA"] <- "Tjureda"
electiondata["kommun"][electiondata["kommun"] == "ASA"] <- "Asa"
electiondata["kommun"][electiondata["kommun"] == "GAARDSBY"] <- "Gårdsby" 
electiondata["kommun"][electiondata["kommun"] == "SOERABY"] <- "Söraby"
electiondata["kommun"][electiondata["kommun"] == "VIRESTAD"] <- "Virestad"
electiondata["kommun"][electiondata["kommun"] == "STENBROH"] <- "Stenbrohult"
electiondata["kommun"][electiondata["kommun"] == "VISLANDA"] <- "Vislanda" 
electiondata["kommun"][electiondata["kommun"] == "BLAEDING"] <- "Blädinge"
electiondata["kommun"][electiondata["V4"] == "705050"] <- "Skatelöv"
electiondata["kommun"][electiondata["kommun"] == "VTORSAAS"] <- "Vestra Torsås"
electiondata["kommun"][electiondata["V4"] == "705070"] <- "Härlunda-Kronoberg"
electiondata["kommun"][electiondata["kommun"] == "AELMHULK"] <- "Älmhult LF"
electiondata["kommun"][electiondata["kommun"] == "LEKARYD"] <- "Lekaryd"
electiondata["kommun"][electiondata["kommun"] == "ARINGSAA"] <- "Aringsås"
electiondata["kommun"][electiondata["V4"] == "705120"] <- "Hjortsberga-Kronoberg"
electiondata["kommun"][electiondata["kommun"] == "KVENNEBE"] <- "Kvenneberga"
electiondata["kommun"][electiondata["kommun"] == "SLAETTHO"] <- "Slätthög"
electiondata["kommun"][electiondata["kommun"] == "MISTELAA"] <- "Mistelås"
electiondata["kommun"][electiondata["kommun"] == "MOHEDA"] <- "Moeda"
electiondata["kommun"][electiondata["V4"] == "705170"] <- "Ör-Allbo"
electiondata["kommun"][electiondata["kommun"] == "HAERLOEV"] <- "Härlöf"
electiondata["kommun"][electiondata["kommun"] == "VITTARYD"] <- "Vittaryd"
electiondata["kommun"][electiondata["kommun"] == "BERGA"] <- "Berga"
electiondata["kommun"][electiondata["kommun"] == "DOERARP"] <- "Dörarp"
electiondata["kommun"][electiondata["V4"] == "706040"] <- "Ryssby-Kronoberg"
electiondata["kommun"][electiondata["kommun"] == "TUTARYD"] <- "Tutaryd"
electiondata["kommun"][electiondata["kommun"] == "AGUNNARY"] <- "Agunnaryd"
electiondata["kommun"][electiondata["kommun"] == "PJAETTER"] <- "Pjetteryd"
electiondata["kommun"][electiondata["kommun"] == "GOETERYD"] <- "Göteryd"
electiondata["kommun"][electiondata["kommun"] == "TRARYD"] <- "Traryd"
electiondata["kommun"][electiondata["kommun"] == "HALLARYD"] <- "Hallaryd"
electiondata["kommun"][electiondata["kommun"] == "MARKARYD"] <- "Markaryd"
electiondata["kommun"][electiondata["kommun"] == "HINNERYD"] <- "Hinneryd"
electiondata["kommun"][electiondata["kommun"] == "ODENSJOE"] <- "Odensjö"
electiondata["kommun"][electiondata["kommun"] == "LIDHULT"] <- "Lidhult"
electiondata["kommun"][electiondata["kommun"] == "VRAA"] <- "Vrå"
electiondata["kommun"][electiondata["kommun"] == "ANNERSTA"] <- "Annerstad"
electiondata$kommun[electiondata$kommun == "TORPA" & electiondata$V4 == "706210"] <- "Torpa-Kronoberg"
electiondata["kommun"][electiondata["kommun"] == "NOETTJA"] <- "Nöttja"
electiondata["kommun"][electiondata["V4"] == "706230"] <- "Ljungby-Kronoberg"
electiondata["kommun"][electiondata["kommun"] == "ANGELSTA"] <- "Angelstad"
electiondata["kommun"][electiondata["kommun"] == "KAANNA"] <- "Kånna"
electiondata["kommun"][electiondata["kommun"] == "SLJUNGA"] <- "Södra Ljunga"
electiondata["kommun"][electiondata["kommun"] == "HAMNEDA"] <- "Hamneda"



## KALMAR
electiondata["kommun"][electiondata["V4"] == "801010"] <- "Dalhem-Kalmar"
electiondata["kommun"][electiondata["kommun"] == "GAERDSER"] <- "Gärdserum"
electiondata["kommun"][electiondata["kommun"] == "UKNA"] <- "Ukna"
electiondata["kommun"][electiondata["kommun"] == "VED"] <- "Vestra Ed"
electiondata["kommun"][electiondata["kommun"] == "OEED"] <- "Östra Ed"
electiondata["kommun"][electiondata["kommun"] == "TRYSERUM"] <- "Tryserum"
electiondata["kommun"][electiondata["kommun"] == "HANNAES"] <- "Hannäs"
electiondata["kommun"][electiondata["kommun"] == "LOFTA"] <- "Lofta"
electiondata["kommun"][electiondata["kommun"] == "LOFTAHAM"] <- "Loftahammar"
electiondata["kommun"][electiondata["kommun"] == "HJORTED"] <- "Hjorted"
electiondata["kommun"][electiondata["kommun"] == "HALLINGE"] <- "Hallingeberg"
electiondata["kommun"][electiondata["kommun"] == "LOCKNEVI"] <- "Locknevi"
electiondata["kommun"][electiondata["V4"] == "802040"] <- "Blacksta-Kalmar"
electiondata["kommun"][electiondata["V4"] == "802050"] <- "Odensvi-Kalmar"
electiondata["kommun"][electiondata["kommun"] == "GLADHAMM"] <- "Gladhammar"
electiondata["kommun"][electiondata["kommun"] == "VAESTERR"] <- "Vesterrum"
electiondata["kommun"][electiondata["kommun"] == "TOERNSFA"] <- "Törnsfall"
electiondata["kommun"][electiondata["kommun"] == "GAMLEBY"] <- "Gamleby"
electiondata["kommun"][electiondata["kommun"] == "MISTERHU"] <- "Misterhult"
electiondata$kommun[electiondata$kommun == "TUNA" & electiondata$V4 == "803020"] <- "Tuna-Kalmar"
electiondata["kommun"][electiondata["kommun"] == "KRISTDAL"] <- "Kristdala"
electiondata["kommun"][electiondata["kommun"] == "RUMSKULL"] <- "Rumskulla"
electiondata["kommun"][electiondata["kommun"] == "VIMMERLK"] <- "Vimmerby LF"
electiondata["kommun"][electiondata["kommun"] == "PELARNE"] <- "Pelarne"
electiondata["kommun"][electiondata["kommun"] == "SOEDRAVI"] <- "Södra Vi"
electiondata["kommun"][electiondata["kommun"] == "DJURSDAL"] <- "Djursdala"
electiondata["kommun"][electiondata["kommun"] == "FROEDING"] <- "Frödinge"
electiondata["kommun"][electiondata["kommun"] == "VENA"] <- "Hvena"
electiondata["kommun"][electiondata["kommun"] == "MOERLUND"] <- "Mörlunda"
electiondata$kommun[electiondata$kommun == "TVETA" & electiondata$V4 == "805020"] <- "Tveta-Kalmar"
electiondata["kommun"][electiondata["kommun"] == "MAALILLA"] <- "Målilla"
electiondata["kommun"][electiondata["kommun"] == "GAARDVED"] <- "Gårdveda"
electiondata["kommun"][electiondata["kommun"] == "LOENNEBE"] <- "Lönnberga"
electiondata["kommun"][electiondata["kommun"] == "VIRSERUM"] <- "Virserum"
electiondata["kommun"][electiondata["kommun"] == "JAEREDA"] <- "Järeda"
electiondata["kommun"][electiondata["kommun"] == "HOEGSBY"] <- "Högsby"
electiondata["kommun"][electiondata["kommun"] == "FAAGELFO"] <- "Fogelfors"
electiondata["kommun"][electiondata["kommun"] == "LAANGEMA"] <- "Långemåla"
electiondata["kommun"][electiondata["kommun"] == "FLISERYD"] <- "Fliseryd"
electiondata["kommun"][electiondata["V4"] == "806050"] <- "Fagerhult-Kalmar"
electiondata["kommun"][electiondata["kommun"] == "KRAAKSMA"] <- "Kråksmåla"
electiondata["kommun"][electiondata["kommun"] == "DOERBY"] <- "Dörby"
electiondata["kommun"][electiondata["kommun"] == "KLAECKEB"] <- "Kläckeberga"
electiondata["kommun"][electiondata["kommun"] == "KALMARLK"] <- "Kalmar LF"
electiondata["kommun"][electiondata["kommun"] == "FOERLOES"] <- "Förlösa"
electiondata["kommun"][electiondata["kommun"] == "KRISTVAL"] <- "Kristvalla"
electiondata["kommun"][electiondata["kommun"] == "AABY"] <- "Åby"
electiondata["kommun"][electiondata["kommun"] == "BAECKEBO"] <- "Bäckebo"
electiondata["kommun"][electiondata["V4"] == "807100"] <- "Ryssby-Kalmar"
electiondata["kommun"][electiondata["kommun"] == "AALEM"] <- "Ålem"
electiondata["kommun"][electiondata["kommun"] == "MOENSTER"] <- "Mönsterås"
electiondata["kommun"][electiondata["kommun"] == "DOEDERHU"] <- "Döderhult"
electiondata["kommun"][electiondata["kommun"] == "TORSAAS"] <- "Torsås"
electiondata["kommun"][electiondata["kommun"] == "GULLABO"] <- "Gullabo"
electiondata["kommun"][electiondata["kommun"] == "VISSEFJA"] <- "Vissefjärda"
electiondata["kommun"][electiondata["kommun"] == "SOEDERAA"] <- "Söderåkra"
electiondata["kommun"][electiondata["kommun"] == "HALLTORP"] <- "Halltorp"
electiondata$kommun[electiondata$kommun == "VAAXTORP" & electiondata$V4 == "809060"] <- "Våxtorp-Kalmar"
electiondata["kommun"][electiondata["kommun"] == "ARBY"] <- "Arby"
electiondata["kommun"][electiondata["kommun"] == "KARLSLUN"] <- "Karlslunda"
electiondata["kommun"][electiondata["V4"] == "809110"] <- "Hagby-Kalmar"
electiondata["kommun"][electiondata["kommun"] == "MORTORP"] <- "Mortorp"
electiondata["kommun"][electiondata["kommun"] == "OSKAR"] <- "Oskar"
electiondata["kommun"][electiondata["kommun"] == "MODESJOE"] <- "Madesjö"
electiondata["kommun"][electiondata["V4"] == "809160"] <- "Örsjö-Kalmar"
electiondata["kommun"][electiondata["V4"] == "809170"] <- "Ljungby-Kalmar"
electiondata["kommun"][electiondata["kommun"] == "1EMMABK"] <- "1EMMABK"
electiondata["kommun"][electiondata["kommun"] == "STSIGFRI"] <- "St Sigfrid"
electiondata["kommun"][electiondata["kommun"] == "HOSSMO"] <- "Hossmo"
electiondata["kommun"][electiondata["kommun"] == "BOEDA"] <- "Böda"
electiondata["kommun"][electiondata["V4"] == "810020"] <- "Högby-Öland"
electiondata["kommun"][electiondata["kommun"] == "KAELLA"] <- "Källa"
electiondata["kommun"][electiondata["kommun"] == "PERSNAES"] <- "Persnäs"
electiondata["kommun"][electiondata["kommun"] == "FOERA"] <- "Föra"
electiondata["kommun"][electiondata["kommun"] == "LOET"] <- "Löt-Öland"
electiondata["kommun"][electiondata["V4"] == "811020"] <- "Ekby-Öland"
electiondata["kommun"][electiondata["kommun"] == "GAERDSL"] <- "Gärdslösa"
electiondata["kommun"][electiondata["V4"] == "811040"] <- "Bredsätra"
electiondata["kommun"][electiondata["kommun"] == "LAANGLOE"] <- "Långlöt"
electiondata["kommun"][electiondata["kommun"] == "RUNSTEN"] <- "Runsten"
electiondata["kommun"][electiondata["kommun"] == "ALBOEKE"] <- "Alböke"
electiondata["kommun"][electiondata["V4"] == "812020"] <- "Köping"
electiondata["kommun"][electiondata["kommun"] == "RAEPPLIN"] <- "Repplinge"
electiondata["kommun"][electiondata["kommun"] == "HOEGSRUM"] <- "Högsrum"
electiondata["kommun"][electiondata["kommun"] == "NMOECKLE"] <- "Norra Möckleby"
electiondata["kommun"][electiondata["kommun"] == "SANDBY"] <- "Sandby"
electiondata["kommun"][electiondata["kommun"] == "GAARDBY"] <- "Gårdby"
electiondata["kommun"][electiondata["kommun"] == "HULTERST"] <- "Hulterstad"
electiondata["kommun"][electiondata["kommun"] == "STENAASA"] <- "Stenåsa"
electiondata["kommun"][electiondata["kommun"] == "RESMO"] <- "Resmo"
electiondata["kommun"][electiondata["kommun"] == "MOERBYLA"] <- "Mörbylånga"
electiondata["kommun"][electiondata["kommun"] == "VICKLEBY"] <- "Vickleby"
electiondata["kommun"][electiondata["kommun"] == "TORSLUND"] <- "Torslunda"
electiondata["kommun"][electiondata["kommun"] == "GLOEMMIN"] <- "Glömminge"
electiondata["kommun"][electiondata["kommun"] == "ALGUTSRU"] <- "Algutsrum"
electiondata["kommun"][electiondata["kommun"] == "MOERBYKG"] <- "MOERBYKG"
electiondata$kommun[electiondata$kommun == "AAS" & electiondata$V4 == "815030"] <- "Ås-Öland"
electiondata["kommun"][electiondata["kommun"] == "GRAESGAA"] <- "Gräsgård"
electiondata$kommun[electiondata$kommun == "SEGERSTA" & electiondata$V4 == "815010"] <- "Segerstad-Öland"
electiondata["kommun"][electiondata["kommun"] == "VENTLING"] <- "Ventlinge"
electiondata["kommun"][electiondata["kommun"] == "SMEDBY"] <- "Smedby"
electiondata["kommun"][electiondata["kommun"] == "SMOECKLE"] <- "Södra Möckleby"
electiondata["kommun"][electiondata["kommun"] == "KASTLOES"] <- "Kastlösa"


## GOTLAND
electiondata["kommun"][electiondata["kommun"] == "VISBYLK"] <- "Visby LF"
electiondata["kommun"][electiondata["kommun"] == "ENDRE"] <- "Endre"
electiondata["kommun"][electiondata["kommun"] == "HEJDEBY"] <- "Hejdeby"
electiondata["kommun"][electiondata["kommun"] == "BARLINGB"] <- "Barlingbo"
electiondata$kommun[electiondata$kommun == "EKEBY" & electiondata$V4 == "901050"] <- "Ekeby-Gotland"
electiondata["kommun"][electiondata["kommun"] == "ROMA"] <- "Roma"
electiondata["kommun"][electiondata["kommun"] == "BJOERKE"] <- "Björke"
electiondata["kommun"][electiondata["kommun"] == "FOLLINGB"] <- "Follingbo"
electiondata["kommun"][electiondata["kommun"] == "AKEBAECK"] <- "Akebäck"
electiondata["kommun"][electiondata["kommun"] == "FOLE"] <- "Fole"
electiondata["kommun"][electiondata["kommun"] == "LOKRUME"] <- "Lokrume"
electiondata["kommun"][electiondata["kommun"] == "VAESTKIN"] <- "Vestkinde"
electiondata["kommun"][electiondata["V4"] == "901240"] <- "Bro-Gotland"
electiondata["kommun"][electiondata["kommun"] == "HEJNUM"] <- "Hejnum"
electiondata["kommun"][electiondata["kommun"] == "BAEL"] <- "Bäl"
electiondata["kommun"][electiondata["V4"] == "901330"] <- "Källunge"
electiondata["kommun"][electiondata["kommun"] == "VALLSTEN"] <- "Vallstena"
electiondata["kommun"][electiondata["kommun"] == "MARTEBO"] <- "Martebo"
electiondata["kommun"][electiondata["kommun"] == "LUMMELUN"] <- "Lummelunda"
electiondata["kommun"][electiondata["V4"] == "901430"] <- "Stenkyrka-Gotland"
electiondata["kommun"][electiondata["kommun"] == "TINGSTAE"] <- "Tingstäde"
electiondata["kommun"][electiondata["kommun"] == "OTHEM"] <- "Othem"
electiondata["kommun"][electiondata["kommun"] == "BOGE"] <- "Boge"
electiondata["kommun"][electiondata["kommun"] == "HANGVAR"] <- "Hangvar"
electiondata["kommun"][electiondata["kommun"] == "HALL"] <- "Hall"
electiondata["kommun"][electiondata["kommun"] == "LAERBRO"] <- "Lärbro"
electiondata["kommun"][electiondata["kommun"] == "HELLVI"] <- "Hellvi"
electiondata["kommun"][electiondata["kommun"] == "RUTE"] <- "Rute"
electiondata["kommun"][electiondata["kommun"] == "FLERINGE"] <- "Fleringe"
electiondata["kommun"][electiondata["kommun"] == "BUNGE"] <- "Bunge"
electiondata["kommun"][electiondata["kommun"] == "FAAROE"] <- "Fårö"
electiondata["kommun"][electiondata["kommun"] == "GOTHEM"] <- "Gothem"
electiondata["kommun"][electiondata["kommun"] == "NORRLAND"] <- "Norrlanda"
electiondata["kommun"][electiondata["kommun"] == "HOERSNEB"] <- "Hörsne"
electiondata["kommun"][electiondata["V4"] == "901810"] <- "Dalhem-Gotland"
electiondata["kommun"][electiondata["kommun"] == "GANTHEM"] <- "Ganthem"
electiondata["kommun"][electiondata["V4"] == "901830"] <- "Halla-Gotland"
electiondata["kommun"][electiondata["kommun"] == "SJONHEM"] <- "Sjonhem"
electiondata["kommun"][electiondata["kommun"] == "VIKLAU"] <- "Viklau"
electiondata["kommun"][electiondata["V4"] == "901860"] <- "Vänge-Gotland"
electiondata["kommun"][electiondata["kommun"] == "BUTTLE"] <- "Buttle"
electiondata["kommun"][electiondata["kommun"] == "GULDRUPE"] <- "Guldrupe"
electiondata["kommun"][electiondata["kommun"] == "OESTERGA"] <- "Östergarn"
electiondata["kommun"][electiondata["kommun"] == "GAMMELGA"] <- "Gammelgarn"
electiondata["kommun"][electiondata["kommun"] == "ANDRE"] <- "Ardre"
electiondata["kommun"][electiondata["kommun"] == "KRAEKLIN"] <- "KRAEKLIN"
electiondata["kommun"][electiondata["V4"] == "901950"] <- "Kräklingbo"
electiondata["kommun"][electiondata["kommun"] == "ALA"] <- "Ala"
electiondata["kommun"][electiondata["kommun"] == "ANGA"] <- "Anga"
electiondata["kommun"][electiondata["kommun"] == "STENKUML"] <- "Stenkumla"
electiondata["kommun"][electiondata["kommun"] == "VAESTERH"] <- "Vesterhejde"
electiondata["kommun"][electiondata["kommun"] == "TRAEKUML"] <- "Träkumla"
electiondata["kommun"][electiondata["kommun"] == "VALL"] <- "Vall"
electiondata["kommun"][electiondata["kommun"] == "HOGRAEN"] <- "Hogrän"
electiondata["kommun"][electiondata["kommun"] == "ATLINGBO"] <- "Atlingbo"
electiondata["kommun"][electiondata["kommun"] == "ESKELHEM"] <- "Eskelhem"
electiondata["kommun"][electiondata["V4"] == "902120"] <- "Tofta-Gotland"
electiondata["kommun"][electiondata["kommun"] == "SANDA"] <- "Sanda"
electiondata["kommun"][electiondata["kommun"] == "MAESTERB"] <- "Mästerby"
electiondata["kommun"][electiondata["kommun"] == "VAESTERG"] <- "Vestergarn"
electiondata["kommun"][electiondata["kommun"] == "HEJDE"] <- "Hejde"
electiondata["kommun"][electiondata["kommun"] == "VAETE"] <- "Väte"
electiondata["kommun"][electiondata["kommun"] == "KLINTE"] <- "Klinte"
electiondata["kommun"][electiondata["kommun"] == "FROEJEL"] <- "Fröjel"
electiondata$kommun[electiondata$kommun == "OEJA" & electiondata$V4 == "902310"] <- "Öja-Gotland"
electiondata["kommun"][electiondata["kommun"] == "HAMRA"] <- "Hamra"
electiondata["kommun"][electiondata["kommun"] == "VAMLINGB"] <- "Vamlingbo"
electiondata["kommun"][electiondata["kommun"] == "SUNDRE"] <- "Sundre"
electiondata["kommun"][electiondata["kommun"] == "HOVDHEM"] <- "Hafdhem"
electiondata["kommun"][electiondata["V4"] == "902420"] <- "Näs-Gotland"
electiondata["kommun"][electiondata["kommun"] == "GROETLIN"] <- "Grötlingbo"
electiondata["kommun"][electiondata["kommun"] == "FIDE"] <- "Fide"
electiondata["kommun"][electiondata["kommun"] == "RONE"] <- "Rone"
electiondata["kommun"][electiondata["kommun"] == "EKE"] <- "Eke"
electiondata["kommun"][electiondata["kommun"] == "ALFVA"] <- "Alva"
electiondata["kommun"][electiondata["kommun"] == "HEMSE"] <- "Hemse"
electiondata["kommun"][electiondata["kommun"] == "HABLINGB"] <- "Hablingbo"
electiondata["kommun"][electiondata["kommun"] == "SILTE"] <- "Silte"
electiondata["kommun"][electiondata["kommun"] == "EKSTA"] <- "Eksta"
electiondata["kommun"][electiondata["kommun"] == "SPROGE"] <- "Sproge"
electiondata["kommun"][electiondata["kommun"] == "FARDHEM"] <- "Fardhem"
electiondata["kommun"][electiondata["kommun"] == "LINDE"] <- "Linde"
electiondata["kommun"][electiondata["kommun"] == "LOJSTA"] <- "Lojsta"
electiondata["kommun"][electiondata["kommun"] == "LEVEDE"] <- "Levede"
electiondata["kommun"][electiondata["kommun"] == "GERUM"] <- "Gerum"
electiondata["kommun"][electiondata["kommun"] == "NAER"] <- "När"
electiondata["kommun"][electiondata["kommun"] == "LAU"] <- "Lau"
electiondata["kommun"][electiondata["kommun"] == "BURS"] <- "Burs" 
electiondata["kommun"][electiondata["kommun"] == "STAANGA"] <- "Stånga"
electiondata["kommun"][electiondata["kommun"] == "ALSKOG"] <- "Alskog"
electiondata["kommun"][electiondata["kommun"] == "LYE"] <- "Lye"
electiondata["kommun"][electiondata["kommun"] == "GARDE"] <- "Garde"
electiondata["kommun"][electiondata["kommun"] == "ETELHEM"] <- "Etelhem"


## BLEKINGE
electiondata["kommun"][electiondata["V4"] == "1001010"] <- "Kristianopel"
electiondata["kommun"][electiondata["kommun"] == "TORHAMN"] <- "Torhamn"
electiondata["kommun"][electiondata["kommun"] == "STURKOE"] <- "Sturkö"
electiondata["kommun"][electiondata["kommun"] == "TJURKOE"] <- "Tjurkö"
electiondata["kommun"][electiondata["kommun"] == "RAMDALA"] <- "Ramdala"
electiondata["kommun"][electiondata["kommun"] == "JAEMSJOE"] <- "Jemjö"
electiondata["kommun"][electiondata["kommun"] == "LOESEN"] <- "Lösen"
electiondata["kommun"][electiondata["kommun"] == "AUGERUM"] <- "Augerum"
electiondata["kommun"][electiondata["kommun"] == "ROEDEBY"] <- "Rödeby"
electiondata["kommun"][electiondata["kommun"] == "FRIDELEV"] <- "Fridlefstad"
electiondata["kommun"][electiondata["kommun"] == "SILLHOEV"] <- "Sillhöfda"
electiondata["kommun"][electiondata["kommun"] == "NAETTRAB"] <- "Nättraby"
electiondata["kommun"][electiondata["kommun"] == "HASSLOE"] <- "Hasslö"
electiondata["kommun"][electiondata["kommun"] == "LISTERBY"] <- "Listerby"
electiondata["kommun"][electiondata["kommun"] == "FOERKAER"] <- "Förkärla"
electiondata["kommun"][electiondata["V4"] == "1002070"] <- "Hjortsberga-Blekinge"
electiondata["kommun"][electiondata["kommun"] == "EDESTAD"] <- "Edestad"
electiondata["kommun"][electiondata["kommun"] == "TVING"] <- "Tving"
electiondata["kommun"][electiondata["kommun"] == "ERINGSBO"] <- "Eringsboda"
electiondata["kommun"][electiondata["kommun"] == "RONNEBLK"] <- "Ronneby LF"
electiondata["kommun"][electiondata["kommun"] == "BACKARYD"] <- "Backaryd"
electiondata["kommun"][electiondata["kommun"] == "HASSL@"] <- "Hasslö v2"
electiondata["kommun"][electiondata["kommun"] == "ASP@BL"] <- "Aspö-Blekinge"
electiondata["kommun"][electiondata["kommun"] == "BRAEKNEH"] <- "Bräkne-Hoby"
electiondata["kommun"][electiondata["kommun"] == "OELJEHUL"] <- "Öljehult"
electiondata["kommun"][electiondata["kommun"] == "HAELLARY"] <- "Hellaryd"
electiondata["kommun"][electiondata["kommun"] == "AARYD"] <- "Åryd"
electiondata["kommun"][electiondata["kommun"] == "ASARUM"] <- "Asarum"
electiondata["kommun"][electiondata["kommun"] == "RINGAMAA"] <- "Ringamåla"
electiondata["kommun"][electiondata["kommun"] == "MOERRUM"] <- "Mörrum"
electiondata["kommun"][electiondata["kommun"] == "ELLEHOLM"] <- "Elleholm"
electiondata["kommun"][electiondata["kommun"] == "JAEMSHOE"] <- "Jemshög"
electiondata["kommun"][electiondata["kommun"] == "KYRKHULT"] <- "Kyrkhult"
electiondata["kommun"][electiondata["kommun"] == "GAMMALST"] <- "Gammalstorp"
electiondata["kommun"][electiondata["kommun"] == "YSANE"] <- "Ysane"
electiondata["kommun"][electiondata["kommun"] == "MJAELLBY"] <- "Mjellby"
electiondata["kommun"][electiondata["kommun"] == "SOELVELK"] <- "Sölvesborg LF"


## KRISTIANSTAD
electiondata["kommun"][electiondata["kommun"] == "RISEBERG"] <- "Riseberga"
electiondata["kommun"][electiondata["kommun"] == "FAERINGT"] <- "Färingtofta"
electiondata["kommun"][electiondata["kommun"] == "ODERLJUN"] <- "Oderljunga"
electiondata["kommun"][electiondata["kommun"] == "PERSTORP"] <- "Perstorp"
electiondata["kommun"][electiondata["V4"] == "1101050"] <- "Hishult, länsdel Kr"
electiondata["kommun"][electiondata["V4"] == "1101060"] <- "Fagerhult-Skåne"
electiondata["kommun"][electiondata["kommun"] == "OERKELLJ"] <- "Örkelljunga"
electiondata["kommun"][electiondata["kommun"] == "RYA"] <- "Rya"
electiondata["kommun"][electiondata["kommun"] == "OELJUNGB"] <- "Östra Ljungby"
electiondata["kommun"][electiondata["kommun"] == "KAELLNA"] <- "Kellna"
electiondata["kommun"][electiondata["kommun"] == "OESSJOE"] <- "Össjö"
electiondata["kommun"][electiondata["kommun"] == "TOSJOE"] <- "Tosjö"
electiondata["kommun"][electiondata["kommun"] == "MUNKALJU"] <- "Munka-Ljungby"
electiondata["kommun"][electiondata["kommun"] == "TOSTARP"] <- "Tostarp"
electiondata["kommun"][electiondata["kommun"] == "GRAAMANS"] <- "Gråmanstorp"
electiondata["kommun"][electiondata["kommun"] == "VEDBY"] <- "Vedby"
electiondata["kommun"][electiondata["kommun"] == "HOEJA"] <- "Höja"
electiondata["kommun"][electiondata["kommun"] == "STARBY"] <- "Starby"
electiondata["kommun"][electiondata["kommun"] == "AUSAAS"] <- "Ausås"
electiondata["kommun"][electiondata["kommun"] == "STROEVEL"] <- "Ströfvelstorp"
electiondata["kommun"][electiondata["kommun"] == "BJOERNEK"] <- "Björnekulla"
electiondata["kommun"][electiondata["kommun"] == "VBROBY"] <- "Vestra Broby"
electiondata["kommun"][electiondata["kommun"] == "KVIDINGE"] <- "Kvidinge"
electiondata["kommun"][electiondata["kommun"] == "VSOENNAR"] <- "Vestra Sönnarslöf"
electiondata["kommun"][electiondata["kommun"] == "STENESTA"] <- "Stenestad"
electiondata["kommun"][electiondata["kommun"] == "BARKAAKR"] <- "Barkåkra"
electiondata["kommun"][electiondata["kommun"] == "REBBELBE"] <- "Rebbelberga"
electiondata["kommun"][electiondata["kommun"] == "FOERSLOE"] <- "Förslöf"
electiondata["kommun"][electiondata["kommun"] == "GREVIE"] <- "Grevie"
electiondata["kommun"][electiondata["kommun"] == "HJAERNAR"] <- "Hjernarp"
electiondata["kommun"][electiondata["kommun"] == "VKARUP"] <- "Vestra Karup"
electiondata["kommun"][electiondata["kommun"] == "TOREKOV"] <- "Torekov"
electiondata["kommun"][electiondata["kommun"] == "HOV"] <- "Hov-Bjäre"
electiondata["kommun"][electiondata["kommun"] == "HAESTVED"] <- "Hästveda"
electiondata["kommun"][electiondata["kommun"] == "OSBY"] <- "Osby"       
electiondata["kommun"][electiondata["kommun"] == "LOSHULT"] <- "Loshult"
electiondata["kommun"][electiondata["kommun"] == "OEBROBY"] <- "Östra Broby"
electiondata["kommun"][electiondata["kommun"] == "EMISLOEV"] <- "Emislöf"
electiondata["kommun"][electiondata["kommun"] == "GLIMAAKR"] <- "Glimåkra"
electiondata["kommun"][electiondata["kommun"] == "OERKENE"] <- "Örkened" 
electiondata["kommun"][electiondata["kommun"] == "HJAERSAA"] <- "Hjersås"
electiondata["kommun"][electiondata["kommun"] == "KNISSLIN"] <- "Knislinge"
electiondata["kommun"][electiondata["kommun"] == "KVIINGE"] <- "Kviinge"
electiondata["kommun"][electiondata["V4"] == "1104130"] <- "Gryt-Kristianstad"
electiondata["kommun"][electiondata["kommun"] == "FOERLOEV"] <- "Färlöf"
electiondata["kommun"][electiondata["kommun"] == "NSTROE"] <- "Norra Strö"
electiondata["kommun"][electiondata["kommun"] == "OENNESTA"] <- "Önnestad"
electiondata["kommun"][electiondata["V4"] == "1105020"] <- "Sörby-Göinge"
electiondata["kommun"][electiondata["kommun"] == "GUMLOESA"] <- "Gumlösa"
electiondata["kommun"][electiondata["kommun"] == "VINSLOEV"] <- "Vinslöf"  
electiondata["kommun"][electiondata["kommun"] == "NAEVLING"] <- "Näflinge"
electiondata["kommun"][electiondata["kommun"] == "NMELLBY"] <- "Norra Mellby"  
electiondata["kommun"][electiondata["kommun"] == "TJOERNAR"] <- "Tjörnarp"
electiondata["kommun"][electiondata["kommun"] == "BROENNES"] <- "Brönnestad"  
electiondata["kommun"][electiondata["kommun"] == "MATTEROE"] <- "Matteröd"
electiondata["kommun"][electiondata["kommun"] == "HAEGLING"] <- "Häglinge"  
electiondata["kommun"][electiondata["kommun"] == "STOBY"] <- "Stoby"  
electiondata["kommun"][electiondata["kommun"] == "VANKIVA"] <- "Vankifva"
electiondata["kommun"][electiondata["kommun"] == "NSANDBY"] <- "Norra Sandby"  
electiondata["kommun"][electiondata["kommun"] == "IGNABERG"] <- "Ignaberga"  
electiondata["kommun"][electiondata["kommun"] == "FINJA"] <- "Finja"
electiondata["kommun"][electiondata["kommun"] == "VINSLK"] <- "VINSLK"  
electiondata["kommun"][electiondata["kommun"] == "H@RJA"] <- "Hörja"  
electiondata["kommun"][electiondata["kommun"] == "ROEKE"] <- "Röke"
electiondata$kommun[electiondata$V4 == "1105230"] <- "Torup-Göinge"
electiondata["kommun"][electiondata["kommun"] == "NAAKARP"] <- "Norra Åkarp"  
electiondata["kommun"][electiondata["kommun"] == "VITTSJOE"] <- "Vittsjö"
electiondata["kommun"][electiondata["kommun"] == "VISSELTO"] <- "Visseltofta"  
electiondata["kommun"][electiondata["kommun"] == "VERUM"] <- "Verum" 
electiondata["kommun"][electiondata["kommun"] == "FARSTORP"] <- "Farstorp"
electiondata["kommun"][electiondata["kommun"] == "NAESUM"] <- "Näsum"  
electiondata["kommun"][electiondata["kommun"] == "IVELTOFT"] <- "Ifvetofta"  
electiondata["kommun"][electiondata["kommun"] == "IVOE"] <- "Ifö"
electiondata["kommun"][electiondata["kommun"] == "KIABY"] <- "Kiaby"  
electiondata["kommun"][electiondata["kommun"] == "TROLLELJ"] <- "Trolle-Ljungby"  
electiondata["kommun"][electiondata["kommun"] == "GUALOEV"] <- "Gualöf"  
electiondata["kommun"][electiondata["kommun"] == "OPPMANNA"] <- "Oppmanna"
electiondata$kommun[electiondata$V4 == "1106100"] <- "Vånga-Kristianstad"
electiondata["kommun"][electiondata["kommun"] == "OESTERLO"] <- "Österslöf"  
electiondata["kommun"][electiondata["kommun"] == "FJAELKIN"] <- "Fjelkinge"
electiondata["kommun"][electiondata["kommun"] == "NYMOE"] <- "Nymö"
electiondata["kommun"][electiondata["kommun"] == "FJAELKES"] <- "Fjelkestad"  
electiondata$kommun[electiondata$V4 == "1106150"] <- "Gustaf Adolf-Villand"
electiondata$kommun[electiondata$V4 == "1106160"] <- "Rinkaby-Villand"
electiondata["kommun"][electiondata["kommun"] == "AAHUS"] <- "Åhus"  
electiondata["kommun"][electiondata["kommun"] == "BROMKG"] <- "BROMKG"  
electiondata["kommun"][electiondata["kommun"] == "NOSABY"] <- "Nosaby"  
electiondata["kommun"][electiondata["kommun"] == "VAE"] <- "Vä" 
electiondata["kommun"][electiondata["kommun"] == "NAASUM"] <- "Norra Åsum"
electiondata["kommun"][electiondata["kommun"] == "SKEPPARS"] <- "Skepparslöf"
electiondata["kommun"][electiondata["kommun"] == "VVRAM"] <- "Vestra Vram" 
electiondata["kommun"][electiondata["kommun"] == "OEVRAM"] <- "Östra Vram"
electiondata["kommun"][electiondata["kommun"] == "KOEPINGE"] <- "Köpinge"
electiondata["kommun"][electiondata["kommun"] == "LYNGSJOE"] <- "Lyngsjö"
electiondata["kommun"][electiondata["kommun"] == "AESPHULT"] <- "Esphult"
electiondata["kommun"][electiondata["kommun"] == "LINDEROE"] <- "Linderöd"  
electiondata["kommun"][electiondata["kommun"] == "TRAENE"] <- "Träne"  
electiondata["kommun"][electiondata["kommun"] == "DJURROED"] <- "Djurröd"
electiondata["kommun"][electiondata["kommun"] == "HUAROED"] <- "Hufvaröd"
electiondata["kommun"][electiondata["kommun"] == "VITTSKOE"] <- "Vittskövle"
electiondata["kommun"][electiondata["kommun"] == "DEGEBERG"] <- "Degeberga" 
electiondata["kommun"][electiondata["kommun"] == "HOERROED"] <- "Hörröd"
electiondata["kommun"][electiondata["kommun"] == "MAGLEHEM"] <- "Maglehem"
electiondata["kommun"][electiondata["kommun"] == "EVEROED"] <- "Efveröd"
electiondata["kommun"][electiondata["kommun"] == "OESOENNA"] <- "Östra Sönnarslöf"
electiondata["kommun"][electiondata["kommun"] == "RAVLUNDA"] <- "Raflunda"
electiondata["kommun"][electiondata["kommun"] == "BROESARP"] <- "Brösarp"
electiondata["kommun"][electiondata["kommun"] == "SMELLBY"] <- "Södra Mellby"
electiondata["kommun"][electiondata["kommun"] == "VITABY"] <- "Hvitaby"
electiondata["kommun"][electiondata["kommun"] == "ANDRARUM"] <- "Andrarum" 
electiondata["kommun"][electiondata["kommun"] == "ELJAROED"] <- "Eljaröd"
electiondata["kommun"][electiondata["V4"] == "1108070"] <- "St Olof-Albo"
electiondata["kommun"][electiondata["kommun"] == "FAAGELTO"] <- "Fogeltofta"
electiondata["kommun"][electiondata["kommun"] == "ROERUM"] <- "Rörum" 
electiondata["kommun"][electiondata["kommun"] == "GLEMMING"] <- "Glemminge"
electiondata["kommun"][electiondata["kommun"] == "TOSTERUP"] <- "Tosterup"
electiondata["kommun"][electiondata["kommun"] == "HAMMENHO"] <- "Hammenhög"
electiondata["kommun"][electiondata["kommun"] == "HANNAS"] <- "Hannas"
electiondata["kommun"][electiondata["kommun"] == "OEHOBY"] <- "Östra Hoby"
electiondata["kommun"][electiondata["kommun"] == "INGELSTO"] <- "Ingelstorp"
electiondata["kommun"][electiondata["kommun"] == "VALLEBER"] <- "Valleberga"
electiondata["kommun"][electiondata["kommun"] == "TOMEKG"] <- "TOMEKG"  
electiondata["kommun"][electiondata["kommun"] == "LOEDERUP"] <- "Löderup"  
electiondata["kommun"][electiondata["kommun"] == "HOERUP"] <- "Hörup"
electiondata["kommun"][electiondata["kommun"] == "TRANAAS"] <- "Tranås" 
electiondata["kommun"][electiondata["kommun"] == "ONSLUNDA"] <- "Onslunda"
electiondata["kommun"][electiondata["kommun"] == "KVERREST"] <- "Kverrestad"
electiondata["kommun"][electiondata["kommun"] == "SMEDSTOR"] <- "Smedstorp"
electiondata["kommun"][electiondata["kommun"] == "TRYDE"] <- "Tryde"  
electiondata["kommun"][electiondata["kommun"] == "SPJUTSTO"] <- "Spjutstorp"  
electiondata["kommun"][electiondata["kommun"] == "ULLSTORP"] <- "Ullstorp"
electiondata["kommun"][electiondata["kommun"] == "BOLLERUP"] <- "Bollerup"
electiondata["kommun"][electiondata["V4"] == "1109220"] <- "Övraby-Skåne"
electiondata["kommun"][electiondata["kommun"] == "BENESTAD"] <- "Benestad" 
electiondata["kommun"][electiondata["kommun"] == "OEHERRES"] <- "Östra Herrestad"
electiondata["kommun"][electiondata["kommun"] == "OEINGEST"] <- "Östra Ingelstad"  
electiondata["kommun"][electiondata["kommun"] == "BORRBY"] <- "Borrby" 
electiondata["kommun"][electiondata["kommun"] == "SIMRIS"] <- "Simris"
electiondata["kommun"][electiondata["kommun"] == "OENOEBBE"] <- "Östra Nöbbelöf"
electiondata["kommun"][electiondata["kommun"] == "GLADSAX"] <- "Gladsax"
electiondata["kommun"][electiondata["kommun"] == "OETOMMAR"] <- "Östra Tommarp"
electiondata["kommun"][electiondata["kommun"] == "JAERREST"] <- "Jerrestad"
electiondata["kommun"][electiondata["kommun"] == "STIBY"] <- "Stiby"
electiondata$kommun[electiondata$kommun == "VALLBY" & electiondata$V4 == "1110070"] <- "Vallby-Skåne"
electiondata["kommun"][electiondata["kommun"] == "BOLSHOEG"] <- "Bolshög"  
electiondata["kommun"][electiondata["kommun"] == "OEVEMMER"] <- "Östra Vemmerlöf"


## MALMÖHUS
electiondata["kommun"][electiondata["kommun"] == "VINGELST"] <- "Vestra Ingelstad"
electiondata["kommun"][electiondata["kommun"] == "OEGREVIE"] <- "Östra Grefvie"
electiondata["kommun"][electiondata["kommun"] == "MGREVIE"] <- "Mellan-Grefvie"
electiondata["kommun"][electiondata["kommun"] == "SAAKARP"] <- "Södra Åkarp"
electiondata["kommun"][electiondata["kommun"] == "GAESSIE"] <- "Gessie"
electiondata["kommun"][electiondata["kommun"] == "ESKILSTO"] <- "Eskilstorp"
electiondata["kommun"][electiondata["kommun"] == "ARRIE"] <- "Arrie"
electiondata["kommun"][electiondata["kommun"] == "HOEKOEPI"] <- "Hököpinge"
electiondata["kommun"][electiondata["kommun"] == "TYGELSJO"] <- "Tygelsjö"
electiondata["kommun"][electiondata["kommun"] == "VKLAGSTO"] <- "Vestra Klagstorp"
electiondata["kommun"][electiondata["kommun"] == "BUNKEFLO"] <- "Bunkeflo"
electiondata["kommun"][electiondata["kommun"] == "FOSIE"] <- "Fosie"
electiondata["kommun"][electiondata["kommun"] == "LOCKARP"] <- "Lockarp"
electiondata["kommun"][electiondata["kommun"] == "HUSIE"] <- "Husie"
electiondata["kommun"][electiondata["kommun"] == "SAERSLO"] <- "Särslöf"
electiondata["kommun"][electiondata["kommun"] == "SVEK@P"] <- "SVEK@P"
electiondata["kommun"][electiondata["kommun"] == "SSALLERU"] <- "Södra Sallerup"
electiondata["kommun"][electiondata["kommun"] == "OXIE"] <- "Oxie"
electiondata["kommun"][electiondata["kommun"] == "TOERRIMG"] <- "Törringe"   
electiondata["kommun"][electiondata["kommun"] == "VKAERRST"] <- "Vestra Kärrstorp"
electiondata["kommun"][electiondata["kommun"] == "GLOSTORP"] <- "Glostorp"
electiondata["kommun"][electiondata["kommun"] == "SVEDALA"] <- "Svedala"
electiondata["kommun"][electiondata["kommun"] == "HAMMARLO"] <- "Hammarlöf"
electiondata["kommun"][electiondata["kommun"] == "VVEMMERL"] <- "Vestra Vemmerlöf"
electiondata["kommun"][electiondata["kommun"] == "MAGLARP"] <- "Maglarp"
electiondata["kommun"][electiondata["kommun"] == "VTOMMARP"] <- "Vestra Tommarp"
electiondata["kommun"][electiondata["kommun"] == "SKEGRIE"] <- "Skegrie"
electiondata["kommun"][electiondata["kommun"] == "RAENG"] <- "Reng"
electiondata["kommun"][electiondata["kommun"] == "SHAMMAR"] <- "Stora Hammar"
electiondata["kommun"][electiondata["kommun"] == "HAASLOEV"] <- "Håslöf"
electiondata["kommun"][electiondata["kommun"] == "BODARP"] <- "Bodarp"
electiondata["kommun"][electiondata["kommun"] == "VAELLING"] <- "Vellinge"
electiondata["kommun"][electiondata["kommun"] == "FUGLIE"] <- "Fuglie"
electiondata$kommun[electiondata$kommun == "VALSTAD" & electiondata$V4 == "1202140"] <- "Vestra Alstad"
electiondata["kommun"][electiondata["kommun"] == "FRUALSTA"] <- "Fru Alstad"
electiondata["kommun"][electiondata["kommun"] == "ANDERSLO"] <- "Anderslöf"
electiondata["kommun"][electiondata["kommun"] == "BOESARP"] <- "Bösarp"
electiondata["kommun"][electiondata["kommun"] == "GYLLE"] <- "Gylle"
electiondata["kommun"][electiondata["kommun"] == "KYRKOKOE"] <- "Kyrkoköpinge"
electiondata["kommun"][electiondata["kommun"] == "STORASLA"] <- "Stora Slågarp"
electiondata["kommun"][electiondata["kommun"] == "LILLASLA"] <- "Lilla Slågarp"
electiondata["kommun"][electiondata["kommun"] == "DALKOEPI"] <- "Dalköpinge"
electiondata["kommun"][electiondata["kommun"] == "GISLOEV"] <- "Gislöf"
electiondata["kommun"][electiondata["kommun"] == "VAELLUV"] <- "Välluf"
electiondata["kommun"][electiondata["kommun"] == "BAARSLOE"] <- "Bårslöf"
electiondata["kommun"][electiondata["kommun"] == "FJAEREST"] <- "Fjärestad"
electiondata["kommun"][electiondata["kommun"] == "FRILLEST"] <- "Frillestad"   
electiondata["kommun"][electiondata["V4"] == "1203070"] <- "Ekby-Luggude"
electiondata["kommun"][electiondata["kommun"] == "HESSLUND"] <- "Häslunda"
electiondata["kommun"][electiondata["kommun"] == "RISEKATS"] <- "Risekatslösa"
electiondata["kommun"][electiondata["kommun"] == "KROPP"] <- "Kropp"
electiondata["kommun"][electiondata["kommun"] == "MOERARP"] <- "Mörarp"
electiondata["kommun"][electiondata["kommun"] == "ALLERUM"] <- "Allerum"
electiondata["kommun"][electiondata["kommun"] == "FLENNING"] <- "Flenninge"
electiondata["kommun"][electiondata["kommun"] == "HOEGANAE"] <- "Höganäs"
electiondata["kommun"][electiondata["kommun"] == "VAESBY"] <- "Väsby"
electiondata["kommun"][electiondata["kommun"] == "VIKEN"] <- "Viken"
electiondata["kommun"][electiondata["kommun"] == "BRUNNBY"] <- "Brunnby"
electiondata["kommun"][electiondata["kommun"] == "FARHULT"] <- "Farhult"
electiondata["kommun"][electiondata["kommun"] == "JONSTORP"] <- "Jonstorp"
electiondata["kommun"][electiondata["kommun"] == "VAELINGE"] <- "Välinge"
electiondata["kommun"][electiondata["kommun"] == "KATTARP"] <- "Kattarp"
electiondata["kommun"][electiondata["kommun"] == "SVRAM"] <- "Södra Vram"
electiondata["kommun"][electiondata["kommun"] == "NVRAM"] <- "Norra Vram"
electiondata["kommun"][electiondata["kommun"] == "BJUV"] <- "Bjuv"
electiondata["kommun"][electiondata["kommun"] == "KAAGEROE"] <- "Kågeröd"
electiondata$kommun[electiondata$kommun == "HALMSTAD" & electiondata$V4 == "1203320"] <- "Halmstad-Malmöhus"
electiondata["kommun"][electiondata["kommun"] == "OTTARP"] <- "Ottarp"
electiondata["kommun"][electiondata["V4"] == "1203340"] <- "Kvistofta"
electiondata["kommun"][electiondata["kommun"] == "SILV$KRA"] <- "Silvåkra"
electiondata["kommun"][electiondata["kommun"] == "REVINGE" & electiondata$V4 == "1204020"] <- "Revinge-Torna"
electiondata["kommun"][electiondata["kommun"] == "HARDEBER"] <- "Hardeberga"
electiondata["kommun"][electiondata["kommun"] == "SSANDBY"] <- "Södra Sandby"
electiondata["kommun"][electiondata["kommun"] == "IGELOEOD"] <- "Igelösa"
electiondata["kommun"][electiondata["kommun"] == "STAEVIE"] <- "Stäfvie"
electiondata["kommun"][electiondata["kommun"] == "LACKALAE"] <- "Lackalänga"
electiondata["kommun"][electiondata["kommun"] == "NNOEBBEL"] <- "Norra Nöbbelöf"
electiondata["kommun"][electiondata["kommun"] == "VHOBY"] <- "Vestra Hoby"
electiondata["kommun"][electiondata["kommun"] == "HAASTAD"] <- "Håstad"
electiondata["kommun"][electiondata["kommun"] == "BORGEBY"] <- "Borgeby"
electiondata["kommun"][electiondata["kommun"] == "STAANGBY"] <- "Stångby"
electiondata["kommun"][electiondata["kommun"] == "VALLKAER"] <- "Vallkärra"
electiondata$kommun[electiondata$kommun == "HAELLEST" & electiondata$V4 == "1204170"] <- "Torna-Hellestad"
electiondata["kommun"][electiondata["V4"] == "1204200"] <- "Dalby-Torna"
electiondata["kommun"][electiondata["kommun"] == "BONDERUP"] <- "Bonderup"
electiondata["kommun"][electiondata["kommun"] == "FJAELIE"] <- "Fjelie"
electiondata["kommun"][electiondata["kommun"] == "FLAEDIE"] <- "Flädie"
electiondata["kommun"][electiondata["kommun"] == "LUNDSLK"] <- "Lund LF"
electiondata["kommun"][electiondata["kommun"] == "STORARAA"] <- "Stora Råby"
electiondata["kommun"][electiondata["kommun"] == "BJAELLER"] <- "Bjellerup"
electiondata["kommun"][electiondata["kommun"] == "EVERLOEV"] <- "Efverlöf"
electiondata["kommun"][electiondata["kommun"] == "VEBEROED"] <- "Veberöd"
electiondata["kommun"][electiondata["kommun"] == "BLENTARP"] <- "Blentarp"
electiondata["kommun"][electiondata["kommun"] == "GOEDELOE"] <- "Gödelöf"
electiondata["kommun"][electiondata["kommun"] == "G$RDSA"] <- "G$RDSA"
electiondata["kommun"][electiondata["kommun"] == "LYNGBY"] <- "Lyngby"
electiondata["kommun"][electiondata["kommun"] == "GENARP"] <- "Genarp"
electiondata["kommun"][electiondata["kommun"] == "SKABERSJ"] <- "Skabersjö"
electiondata["kommun"][electiondata["kommun"] == "KNAESTOR"] <- "Knästorp"
electiondata["kommun"][electiondata["kommun"] == "TOTTARP"] <- "Tottarp"
electiondata["kommun"][electiondata["kommun"] == "KYRKHEDD"] <- "Kyrkheddinge"
electiondata["kommun"][electiondata["kommun"] == "ESARP"] <- "Esarp"
electiondata["kommun"][electiondata["kommun"] == "BARA"] <- "Bara"
electiondata["kommun"][electiondata["kommun"] == "MOELLEBE"] <- "Mölleberga"
electiondata["kommun"][electiondata["kommun"] == "GOERSLOE"] <- "Görslöf"
electiondata["kommun"][electiondata["kommun"] == "BURLOEV"] <- "Burlöf"
electiondata["kommun"][electiondata["kommun"] == "STORAUPP"] <- "Stora Uppåkra"
electiondata["kommun"][electiondata["kommun"] == "FLACKARP"] <- "Flackarp"
electiondata["kommun"][electiondata["kommun"] == "BRAAGARP"] <- "Brågarp"
electiondata["kommun"][electiondata["kommun"] == "NEVISHOE"] <- "Nefvishög"
electiondata["kommun"][electiondata["kommun"] == "HYBY"] <- "Hyby"
electiondata["kommun"][electiondata["kommun"] == "BJAERSHO"] <- "Bjershög"
electiondata["kommun"][electiondata["kommun"] == "LOMMA"] <- "Lomma"
electiondata["kommun"][electiondata["kommun"] == "FULLTOFT"] <- "Fulltofta"
electiondata["kommun"][electiondata["kommun"] == "OEAESPIN"] <- "Östra Espinge"
electiondata["kommun"][electiondata["kommun"] == "HOERBY"] <- "Hörby"
electiondata["kommun"][electiondata["kommun"] == "LYBY"] <- "Lyby"              
electiondata["kommun"][electiondata["kommun"] == "OESALLER"] <- "Östra Sallerup"
electiondata["kommun"][electiondata["kommun"] == "SVENSKOE"] <- "Svensköp"
electiondata["kommun"][electiondata["kommun"] == "HOEGSERO"] <- "Högseröd"
electiondata["kommun"][electiondata["kommun"] == "NROERUM"] <- "Norra Rörum"
electiondata["kommun"][electiondata["kommun"] == "SROERUM"] <- "Södra Rörum"
electiondata["kommun"][electiondata["kommun"] == "HOER"] <- "Hör"
electiondata["kommun"][electiondata["kommun"] == "MUNKARP"] <- "Munkarp" 
electiondata["kommun"][electiondata["kommun"] == "BOSJOEKL"] <- "Bosjökloster"
electiondata["kommun"][electiondata["kommun"] == "HARLOESA"] <- "Harlösa"
electiondata["kommun"][electiondata["kommun"] == "HAMMARLU"] <- "Hammarlunda"
electiondata["kommun"][electiondata["kommun"] == "OESTROE"] <- "Östra Strö" 
electiondata["kommun"][electiondata["kommun"] == "SKARHULT"] <- "Skarhult"
electiondata["kommun"][electiondata["kommun"] == "GUDMUNTO"] <- "Gudmuntorp"
electiondata["kommun"][electiondata["kommun"] == "HURVA"] <- "Hurva"
electiondata["kommun"][electiondata["kommun"] == "GAARDSTA"] <- "Gårdstånga"
electiondata["kommun"][electiondata["kommun"] == "HOLMBY"] <- "Holmby"
electiondata["kommun"][electiondata["kommun"] == "BORRLUND"] <- "Borrlunda"
electiondata["kommun"][electiondata["kommun"] == "SKEGLING"] <- "Skeglinge"
electiondata["kommun"][electiondata["kommun"] == "BRANDSTA"] <- "Brandstad"
electiondata["kommun"][electiondata["kommun"] == "SAASUM"] <- "Södra Åsum"
electiondata["kommun"][electiondata["kommun"] == "LOEVESTA"] <- "Löfvestad"
electiondata["kommun"][electiondata["kommun"] == "OEVED"] <- "Öved"
electiondata["kommun"][electiondata["kommun"] == "VANSTAD"] <- "Vanstad"
electiondata["kommun"][electiondata["kommun"] == "TOLAANGA"] <- "Tolånga"
electiondata["kommun"][electiondata["kommun"] == "ILSTORP"] <- "Ilstorp"
electiondata["kommun"][electiondata["kommun"] == "BJOERKA"] <- "Björka"
electiondata["kommun"][electiondata["V4"] == "1207110"] <- "Våmb-Malmöhus"
electiondata["kommun"][electiondata["kommun"] == "ROEDINGE"] <- "Rödinge"
electiondata["kommun"][electiondata["kommun"] == "RAMSAASA"] <- "Ramsåsa"
electiondata["kommun"][electiondata["kommun"] == "VAESTERS"] <- "Vesterstad"
electiondata["kommun"][electiondata["kommun"] == "OESTRABY"] <- "Östraby"
electiondata["kommun"][electiondata["kommun"] == "FRENNING"] <- "Frenninge"
electiondata["kommun"][electiondata["kommun"] == "VOLLSJOE"] <- "Vollsjö"
electiondata["kommun"][electiondata["kommun"] == "OEKAERRS"] <- "Östra Kärrstorp"
electiondata["kommun"][electiondata["kommun"] == "LAANGARO"] <- "Långaröd"
electiondata["kommun"][electiondata["kommun"] == "SOEVDE"] <- "Söfde"
electiondata["kommun"][electiondata["kommun"] == "VILLIE"] <- "Villie"
electiondata["kommun"][electiondata["kommun"] == "VNOEBBEL"] <- "Vestra Nöbbelöf"
electiondata["kommun"][electiondata["kommun"] == "SJOERUP"] <- "Sjörup"
electiondata["kommun"][electiondata["V4"] == "1208040"] <- "Katslösa"
electiondata["kommun"][electiondata["kommun"] == "BALKAAKR"] <- "Balkåkra"
electiondata["kommun"][electiondata["kommun"] == "SNAAREST"] <- "Snårestad"           
electiondata["kommun"][electiondata["kommun"] == "SKAARBY"] <- "Skårby"
electiondata["kommun"][electiondata["kommun"] == "STKOEPIN"] <- "Stora Köpinge"
electiondata["kommun"][electiondata["kommun"] == "STHERRES"] <- "Stora Herrestad"
electiondata["kommun"][electiondata["kommun"] == "BORRIE"] <- "Borrie"
electiondata$kommun[electiondata$kommun == "OEJA" & electiondata$V4 == "1209040"] <- "Öja-Herrestads"
electiondata["kommun"][electiondata["kommun"] == "HEDESKOG"] <- "Hedeskoga"
electiondata["kommun"][electiondata["kommun"] == "SOEVESTA"] <- "Söfvestad"
electiondata["kommun"][electiondata["V4"] == "1209070"] <- "Bromma-Herrestad"
electiondata["kommun"][electiondata["kommun"] == "HOEGESTA"] <- "Högestad"
electiondata["kommun"][electiondata["kommun"] == "BALDRING"] <- "Baldringe"
electiondata["kommun"][electiondata["kommun"] == "BJAERESJ"] <- "Bjeresjö"
electiondata["kommun"][electiondata["kommun"] == "SIMLINGE"] <- "Simlinge"
electiondata["kommun"][electiondata["kommun"] == "HEMMINGS"] <- "Hemmingsdynge"
electiondata["kommun"][electiondata["kommun"] == "SAABY"] <- "Södra Åby"
electiondata["kommun"][electiondata["kommun"] == "OETORP"] <- "Östra Torp"     
electiondata["kommun"][electiondata["kommun"] == "LILLAISI"] <- "Lilla Isie"
electiondata["kommun"][electiondata["kommun"] == "AESPOE"] <- "Espö"
electiondata["kommun"][electiondata["kommun"] == "OEKLAGST"] <- "Östra Klagstorp"
electiondata["kommun"][electiondata["kommun"] == "KAELLSTO"] <- "Kellstorp"
electiondata["kommun"][electiondata["kommun"] == "LILLABED"] <- "Lilla Bedinge"
electiondata["kommun"][electiondata["kommun"] == "GAERDSLO"] <- "Gerdslöf"
electiondata["kommun"][electiondata["kommun"] == "OENNARP"] <- "Önnarp"
electiondata["kommun"][electiondata["kommun"] == "TULLSTOR"] <- "Tullstorp"
electiondata["kommun"][electiondata["kommun"] == "SVENSTOR"] <- "Svenstorp"
electiondata["kommun"][electiondata["kommun"] == "OEVEMMEN"] <- "Östra Vemmenhög"
electiondata["kommun"][electiondata["kommun"] == "VVEMMENH"] <- "Vestra Vemmenhög"
electiondata["kommun"][electiondata["kommun"] == "KIVARP"] <- "Skifarp"
electiondata["kommun"][electiondata["V4"] == "1210210"] <- "Örsjö-Malmöhus"
electiondata["kommun"][electiondata["V4"] == "1210220"] <- "Solberga-Skåne"
electiondata["kommun"][electiondata["kommun"] == "HASSLEBO"] <- "Hassle-Bösarp"
electiondata["kommun"][electiondata["kommun"] == "SLIMMING"] <- "Slimminge"
electiondata["kommun"][electiondata["kommun"] == "SKURUP"] <- "Skurup"
electiondata["kommun"][electiondata["kommun"] == "GROENBY"] <- "Grönby"
electiondata["kommun"][electiondata["V4"] == "1210270"] <- "Gustaf-Vemmenhög"
electiondata["kommun"][electiondata["kommun"] == "B@RRIN"] <- "Börringe"
electiondata["kommun"][electiondata["kommun"] == "STIBB"] <- "St Ibb"
electiondata["kommun"][electiondata["V4"] == "1211020"] <- "Kvistofta-Rönnebergs"
electiondata["kommun"][electiondata["kommun"] == "GLUMSLOE"] <- "Glumslöf"
electiondata["kommun"][electiondata["kommun"] == "HERSLOEV"] <- "Herslöf"
electiondata$kommun[electiondata$kommun == "SAEBY" & electiondata$V4 == "1211050"] <- "Säby-Skåne"
electiondata["kommun"][electiondata["kommun"] == "VADENSJO"] <- "Vadensjö"
electiondata["kommun"][electiondata["kommun"] == "OERJA"] <- "Örja"
electiondata["kommun"][electiondata["kommun"] == "ASMUNDTO"] <- "Asmundtorp"
electiondata["kommun"][electiondata["V4"] == "1211110"] <- "Tofta-Skåne"
electiondata["kommun"][electiondata["kommun"] == "BILLEBER"] <- "Billeberga"
electiondata["kommun"][electiondata["kommun"] == "TIRUP"] <- "Tirup"
electiondata["kommun"][electiondata["kommun"] == "FELESTAD"] <- "Felestad"
electiondata["kommun"][electiondata["kommun"] == "SIREKOEP"] <- "Sireköpinge"
electiondata["kommun"][electiondata["kommun"] == "SVAL@V"] <- "Norra Svalöv"
electiondata["kommun"][electiondata["kommun"] == "ANNELOEV"] <- "Annelöv"
electiondata["kommun"][electiondata["V4"] == "1212020"] <- "Norrvidinge"
electiondata["kommun"][electiondata["kommun"] == "KELLSNOE"] <- "Kells-Nöbbelöf"
electiondata["kommun"][electiondata["kommun"] == "TORRLOES"] <- "Torrlösa"
electiondata["kommun"][electiondata["kommun"] == "NSKRAEFL"] <- "Norra Skreflinge"
electiondata["kommun"][electiondata["kommun"] == "RESLOEF"] <- "Reslöf"
electiondata["kommun"][electiondata["kommun"] == "OEKARLEB"] <- "Östra Karaby"
electiondata["kommun"][electiondata["kommun"] == "TROLLENA"] <- "Trollenäs"
electiondata["kommun"][electiondata["kommun"] == "BOSARP"] <- "Bosarp"
electiondata["kommun"][electiondata["kommun"] == "VSTROE"] <- "Vestra Strö"
electiondata["kommun"][electiondata["kommun"] == "KONGA"] <- "Konga"
electiondata$kommun[electiondata$kommun == "ASK" & electiondata$V4 == "1212140"] <- "Ask-Onsjö"
electiondata["kommun"][electiondata["kommun"] == "BILLINGE"] <- "Billinge"
electiondata["kommun"][electiondata["kommun"] == "ROESTAAN"] <- "Röstånga"
electiondata["kommun"][electiondata["kommun"] == "HALLAROE"] <- "Hallaröd"
electiondata$kommun[electiondata$kommun == "STEHAG" & electiondata$V4 == "1212200"] <- "Stehag"
electiondata$kommun[electiondata$kommun == "STEHAG" & electiondata$V4 == "1213010"] <- "Stehag-2"
electiondata["kommun"][electiondata["kommun"] == "VSALLERV"] <- "Vestra Sallerup"
electiondata["kommun"][electiondata["kommun"] == "REMMARLO"] <- "Remmarlöf"
electiondata["kommun"][electiondata["kommun"] == "OERTOFTA"] <- "Örtofta"
electiondata["kommun"][electiondata["kommun"] == "LHARRIE"] <- "Lilla Harrie"
electiondata["kommun"][electiondata["kommun"] == "SHARRIE"] <- "Stora Harrie"
electiondata["kommun"][electiondata["kommun"] == "VIRKE"] <- "Virke"
electiondata$kommun[electiondata$kommun == "HOEG" & electiondata$V4 == "1213100"] <- "Hög-Harjager"
electiondata["kommun"][electiondata["kommun"] == "KAEVLING"] <- "Kävlinge"
electiondata["kommun"][electiondata["kommun"] == "VKARLEBY"] <- "Vestra Karleby"
electiondata["kommun"][electiondata["kommun"] == "SAXTORP"] <- "Saxtorp"
electiondata["kommun"][electiondata["kommun"] == "SOEDERVI"] <- "Söderhvidinge"
electiondata["kommun"][electiondata["V4"] == "1213150"] <- "Norrvidinge-Harjagers"
electiondata["kommun"][electiondata["kommun"] == "DAGSTORP"] <- "Dagstorp"
electiondata["kommun"][electiondata["kommun"] == "BARSEBAE"] <- "Barsebäck"
electiondata["kommun"][electiondata["kommun"] == "HOFTERUP"] <- "Hofterup"
electiondata["kommun"][electiondata["kommun"] == "LOEDDEKO"] <- "Löddeköpinge"



## HALLAND
electiondata["kommun"][electiondata["kommun"] == "VEINGE"] <- "Veinge"
electiondata["kommun"][electiondata["kommun"] == "TJAERBY"] <- "Tjärby"
electiondata["kommun"][electiondata["kommun"] == "KNAERED"] <- "Knäred"
electiondata["kommun"][electiondata["kommun"] == "LAHOLMLK"] <- "Laholms LF"
electiondata["kommun"][electiondata["kommun"] == "RAENNESL"] <- "Ränneslöv"
electiondata["kommun"][electiondata["kommun"] == "YSBY"] <- "Ysby"
electiondata["kommun"][electiondata["kommun"] == "OEKARUP"] <- "Östra Karup"
electiondata["kommun"][electiondata["kommun"] == "SKUMMESL"] <- "Skummeslöf"
electiondata["kommun"][electiondata["kommun"] == "HASSLOEV"] <- "Hasslöf"
electiondata$kommun[electiondata$kommun == "VAAXTORP" & electiondata$V4 == "1301120"] <- "Våxtorp-Halland"
electiondata$kommun[electiondata$kommun == "HISHULT" & electiondata$V4 == "1301130"] <- "Hishult"
electiondata["kommun"][electiondata["kommun"] == "ELDSBERG"] <- "Eldsberga"
electiondata["kommun"][electiondata["kommun"] == "TOENNERS"] <- "Tönnersjö"
electiondata["kommun"][electiondata["kommun"] == "SNOESTOR"] <- "Snöstorp"
electiondata["kommun"][electiondata["kommun"] == "TROENNIN"] <- "Trönninge"
electiondata["kommun"][electiondata["kommun"] == "ENSLOEV"] <- "Enslöv"
electiondata["kommun"][electiondata["kommun"] == "BREDARED"] <- "Bredared-Halland"
electiondata["kommun"][electiondata["V4"] == "1303020"] <- "Torup-Halmstad"
electiondata["kommun"][electiondata["kommun"] == "KINNARED"] <- "Kinnared"
electiondata["kommun"][electiondata["V4"] == "1303040"] <- "Övraby-Halmstad"
electiondata["kommun"][electiondata["V4"] == "1303050"] <- "Holm-Halmstad"
electiondata["kommun"][electiondata["kommun"] == "SOENDRUM"] <- "Söndrum"
electiondata["kommun"][electiondata["kommun"] == "VAPNOE"] <- "Vapnö"
electiondata["kommun"][electiondata["kommun"] == "HARPLING"] <- "Harplinge"
electiondata["kommun"][electiondata["kommun"] == "STENINGE"] <- "Steninge"
electiondata["kommun"][electiondata["kommun"] == "GETINGE"] <- "Getinge"
electiondata["kommun"][electiondata["V4"] == "1303130"] <- "Revinge-Halland"
electiondata["kommun"][electiondata["kommun"] == "SLAETTAA"] <- "Slättåkra"
electiondata["kommun"][electiondata["kommun"] == "KVIBILLE"] <- "Kvibille"
electiondata["kommun"][electiondata["kommun"] == "SLOEINGE"] <- "Slöinge"
electiondata["kommun"][electiondata["kommun"] == "EFTRA"] <- "Eftra"
electiondata["kommun"][electiondata["kommun"] == "SKREA"] <- "Skrea"
electiondata["kommun"][electiondata["kommun"] == "AARSTAD"] <- "Årstad"
electiondata["kommun"][electiondata["kommun"] == "ASIGE"] <- "Asige"
electiondata["kommun"][electiondata["kommun"] == "ABILD"] <- "Abild"
electiondata["kommun"][electiondata["kommun"] == "VESSIGE"] <- "Vessige"
electiondata["kommun"][electiondata["kommun"] == "ASKOME"] <- "Askome"
electiondata["kommun"][electiondata["kommun"] == "DRAENGSE"] <- "Drängsered"
electiondata["kommun"][electiondata["kommun"] == "KROGSERE"] <- "Krogsered"
electiondata["kommun"][electiondata["kommun"] == "GAELLARE"] <- "Gällared"
electiondata["kommun"][electiondata["kommun"] == "GUNNARP"] <- "Gunnarp"
electiondata["kommun"][electiondata["V4"] == "1305030"] <- "Ljungby-Halland"
electiondata["kommun"][electiondata["kommun"] == "ALFSHOEG"] <- "Alfshög"
electiondata["kommun"][electiondata["kommun"] == "VINBERG"] <- "Vinberg"
electiondata["kommun"][electiondata["kommun"] == "STAFSING"] <- "Stafsinge"
electiondata["kommun"][electiondata["kommun"] == "MORUP"] <- "Morup"
electiondata["kommun"][electiondata["kommun"] == "FAGERRED"] <- "Fagerred"
electiondata["kommun"][electiondata["kommun"] == "KAELLSJO"] <- "Källsjö"
electiondata["kommun"][electiondata["kommun"] == "ULLARED"] <- "Ullared"
electiondata["kommun"][electiondata["kommun"] == "OKOME"] <- "Okome"
electiondata["kommun"][electiondata["kommun"] == "KOEINGE"] <- "Köinge"
electiondata["kommun"][electiondata["kommun"] == "SVARTRAA"] <- "Svartrå"
electiondata["kommun"][electiondata["kommun"] == "SIBBARP"] <- "Sibbarp"
electiondata["kommun"][electiondata["kommun"] == "DAGSAAS"] <- "Dagsås"
electiondata["kommun"][electiondata["kommun"] == "GRIMETON"] <- "Grimeton"
electiondata["kommun"][electiondata["kommun"] == "ROLFSTOR"] <- "Rolfstorp"
electiondata["kommun"][electiondata["kommun"] == "VALINGE"] <- "Hvalinge"
electiondata["kommun"][electiondata["kommun"] == "STAMNARE"] <- "Stamnared"
electiondata["kommun"][electiondata["kommun"] == "SKAELLIN"] <- "Skällinge"
electiondata["kommun"][electiondata["kommun"] == "NOESSLIN"] <- "Nöslinge"
electiondata["kommun"][electiondata["kommun"] == "TVAAAAKE"] <- "Tvååker"
electiondata["kommun"][electiondata["kommun"] == "SPANNARP"] <- "Spannarp"
electiondata["kommun"][electiondata["kommun"] == "HUNNESTA"] <- "Hunnestad"
electiondata["kommun"][electiondata["kommun"] == "GOEDESTA"] <- "Gödestad"
electiondata["kommun"][electiondata["kommun"] == "LINDBERG"] <- "Lindberg"
electiondata$kommun[electiondata$kommun == "TORPA" & electiondata$V4 == "1306140"] <- "Torpa-Halland"
electiondata["kommun"][electiondata["kommun"] == "TRAESLOE"] <- "Träslöf"
electiondata["kommun"][electiondata["kommun"] == "VAEROE"] <- "Värö"
electiondata["kommun"][electiondata["kommun"] == "STRAAVAL"] <- "Stråvalla"
electiondata["kommun"][electiondata["kommun"] == "VEDDINGE"] <- "Veddige"
electiondata$kommun[electiondata$kommun == "AAS" & electiondata$V4 == "1307040"] <- "Ås-Halland"
electiondata["kommun"][electiondata["kommun"] == "SAELLSTO"] <- "Sällstorp"
electiondata["kommun"][electiondata["kommun"] == "OELMEVAL"] <- "Ölmevalla"
electiondata["kommun"][electiondata["kommun"] == "LANDA"] <- "Landa-Fjäre"
electiondata["kommun"][electiondata["kommun"] == "FRILLESA"] <- "Frillesås"
electiondata["kommun"][electiondata["kommun"] == "GAELLING"] <- "Gällinge"
electiondata["kommun"][electiondata["kommun"] == "IDALA"] <- "Idala"
electiondata["kommun"][electiondata["kommun"] == "FJAERSAA"] <- "Fjärås"
electiondata["kommun"][electiondata["kommun"] == "FOERLAND"] <- "Förlanda"
electiondata["kommun"][electiondata["kommun"] == "HANHALS"] <- "Hanhals"
electiondata["kommun"][electiondata["kommun"] == "TOELOE"] <- "Tölö"
electiondata["kommun"][electiondata["kommun"] == "LINDOME"] <- "Lindome"
electiondata["kommun"][electiondata["kommun"] == "AELVSAAK"] <- "Elfsåker"
electiondata["kommun"][electiondata["kommun"] == "ONSALA"] <- "Onsala"
electiondata["kommun"][electiondata["kommun"] == "VALLDA"] <- "Vallda"
electiondata["kommun"][electiondata["kommun"] == "SLAEP"] <- "Släp"
electiondata$kommun[electiondata$kommun == "HALMSTAD" & electiondata$V4 == "1309080"] <- "Halmstad stad"

## GBG OCH BOHUS
electiondata["kommun"][electiondata["kommun"] == "FAESSBER"] <- "Fässberg"
electiondata["kommun"][electiondata["kommun"] == "VFROELUN"] <- "Vestra Frölunda"
electiondata["kommun"][electiondata["kommun"] == "ASKIM"] <- "Askim"
electiondata["kommun"][electiondata["kommun"] == "KAALLERE"] <- "Kållered"
electiondata["kommun"][electiondata["V4"] == "1401060"] <- "Råda-Gbg"
electiondata["kommun"][electiondata["kommun"] == "STYRSOE"] <- "Styrsö"
electiondata["kommun"][electiondata["kommun"] == "ROEDBO"] <- "Rödbo"
electiondata["kommun"][electiondata["kommun"] == "SAEVE"] <- "Säfve"
electiondata["kommun"][electiondata["kommun"] == "BACKA"] <- "Backa"
electiondata["kommun"][electiondata["kommun"] == "BJOERLAN"] <- "Björlanda"
electiondata["kommun"][electiondata["kommun"] == "TORSLAND"] <- "Torslanda"
electiondata["kommun"][electiondata["kommun"] == "OECKEROE"] <- "Öckerö"
electiondata["kommun"][electiondata["kommun"] == "TUVE"] <- "Tufve"
electiondata["kommun"][electiondata["kommun"] == "OERGRYTE"] <- "Örgryte"
electiondata["kommun"][electiondata["kommun"] == "LANDVETT"] <- "Landvetter"
electiondata["kommun"][electiondata["kommun"] == "PARTILLE"] <- "Partille"
electiondata["kommun"][electiondata["kommun"] == "HAERRYDA"] <- "Härryda"
electiondata["kommun"][electiondata["kommun"] == "KAREBY"] <- "Kareby"
electiondata["kommun"][electiondata["kommun"] == "ROMELAND"] <- "Romelanda"
electiondata["kommun"][electiondata["kommun"] == "YTTERBY"] <- "Ytterby"
electiondata["kommun"][electiondata["kommun"] == "TORSBY"] <- "Torsby"
electiondata["kommun"][electiondata["kommun"] == "HARESTAD"] <- "Harestad"
electiondata["kommun"][electiondata["kommun"] == "LYCKE"] <- "Lycke"
electiondata["kommun"][electiondata["V4"] == "1406010"] <- "Solberga-Bohus"
electiondata["kommun"][electiondata["kommun"] == "HAALTA"] <- "Hålta"
electiondata["kommun"][electiondata["kommun"] == "JOERLAND"] <- "Jörlanda"
electiondata["kommun"][electiondata["kommun"] == "SPEKEROE"] <- "Spekeröd"
electiondata["kommun"][electiondata["kommun"] == "UCKLUM"] <- "Ucklum"
electiondata["kommun"][electiondata["kommun"] == "OEDSMAAL"] <- "Ödsmål"
electiondata["kommun"][electiondata["kommun"] == "NORUM"] <- "Norum"
electiondata["kommun"][electiondata["kommun"] == "FORSHAEL"] <- "Forshälla"
electiondata["kommun"][electiondata["kommun"] == "RESTEROE"] <- "Resteröd"
electiondata["kommun"][electiondata["V4"] == "1407030"] <- "Ljung-Bohus"
electiondata["kommun"][electiondata["kommun"] == "GRINNERO"] <- "Grinneröd"
electiondata["kommun"][electiondata["kommun"] == "HJAERTUM"] <- "Hjertum"
electiondata["kommun"][electiondata["V4"] == "1408020"] <- "Vesterlanda"
electiondata["kommun"][electiondata["kommun"] == "MYCKLEBY"] <- "Myckleby"
electiondata$kommun[electiondata$kommun == "TORP" & electiondata$V4 == "1409020"] <- "Torp-Bohus"
electiondata["kommun"][electiondata["kommun"] == "LAANGELA"] <- "Långelanda"
electiondata["kommun"][electiondata["kommun"] == "STALA"] <- "Stala"
electiondata["kommun"][electiondata["kommun"] == "TEGNEBY"] <- "Tegneby"
electiondata["kommun"][electiondata["kommun"] == "ROERA"] <- "Röra"
electiondata["kommun"][electiondata["kommun"] == "MORLANDA"] <- "Morlanda"
electiondata["kommun"][electiondata["kommun"] == "SKAFTOE"] <- "Skaftö"
electiondata["kommun"][electiondata["kommun"] == "FISKEBAE"] <- "Fiskebäckskil"
electiondata["kommun"][electiondata["V4"] == "1410060"] <- "Grundsund"
electiondata["kommun"][electiondata["kommun"] == "GULLHOLM"] <- "Gullholmen"
electiondata["kommun"][electiondata["kommun"] == "KAERINGO"] <- "Käringön"
electiondata["kommun"][electiondata["kommun"] == "MOLLOESU"] <- "Mollösund"
electiondata["kommun"][electiondata["V4"] == "1411010"] <- "Stenkyrka-Bohus"
electiondata["kommun"][electiondata["kommun"] == "KLAEDESH"] <- "Klädesholmen"
electiondata["kommun"][electiondata["kommun"] == "VALLA"] <- "Valla"
electiondata["kommun"][electiondata["kommun"] == "KLOEVEDA"] <- "Klöfvedal"
electiondata["kommun"][electiondata["kommun"] == "ROENNAEN"] <- "Rönnäng"
electiondata["kommun"][electiondata["kommun"] == "LANNERYR"] <- "Lane-Ryr"
electiondata["kommun"][electiondata["kommun"] == "RAEVE"] <- "Bäfve"
electiondata["kommun"][electiondata["kommun"] == "SKREDSVI"] <- "Skredsvik"
electiondata["kommun"][electiondata["V4"] == "1412040"] <- "Herrestad-Bohus"
electiondata["kommun"][electiondata["kommun"] == "HOEGAAS"] <- "Högås"
electiondata["kommun"][electiondata["kommun"] == "BOKENAES"] <- "Bokenäs"
electiondata["kommun"][electiondata["kommun"] == "DRAGSMAR"] <- "Dragsmark"
electiondata["kommun"][electiondata["kommun"] == "FOSS"] <- "Foss"
electiondata["kommun"][electiondata["kommun"] == "SVARTEBO"] <- "Svarteborg"
electiondata["kommun"][electiondata["kommun"] == "HAABY"] <- "Håby"
electiondata["kommun"][electiondata["V4"] == "1414010"] <- "Bro-Bohus"
electiondata["kommun"][electiondata["kommun"] == "BRASTAD"] <- "Brastad"
electiondata["kommun"][electiondata["kommun"] == "LYSE"] <- "Lyse"
electiondata["kommun"][electiondata["kommun"] == "KROKSTAD"] <- "Krokstad"
electiondata["kommun"][electiondata["kommun"] == "SANNE"] <- "Sanne"
electiondata["kommun"][electiondata["V4"] == "1415030"] <- "Hede-Bohus"
electiondata["kommun"][electiondata["kommun"] == "TOSSENE"] <- "Tossene"
electiondata["kommun"][electiondata["kommun"] == "ASKUM"] <- "Askum"
electiondata["kommun"][electiondata["kommun"] == "KUNGSHAM"] <- "Kungshamn"
electiondata["kommun"][electiondata["kommun"] == "MALMOEN"] <- "Malmön"
electiondata["kommun"][electiondata["kommun"] == "BAERFEND"] <- "Berfendal"
electiondata["kommun"][electiondata["kommun"] == "SKEE"] <- "Skee"
electiondata["kommun"][electiondata["kommun"] == "BJOERNER"] <- "BJOERNER"
electiondata["kommun"][electiondata["kommun"] == "TJAERNOE"] <- "Tjärnö"
electiondata["kommun"][electiondata["kommun"] == "NAESINGE"] <- "Näsinge"
electiondata["kommun"][electiondata["kommun"] == "HOGDAL"] <- "Hogdal"
electiondata["kommun"][electiondata["kommun"] == "LOMMELAN"] <- "Lommeland"
electiondata["kommun"][electiondata["kommun"] == "KVILLE"] <- "Kville"
electiondata["kommun"][electiondata["V4"] == "1418020"] <- "Svenneby-Bohus"
electiondata["kommun"][electiondata["kommun"] == "BOTTNA"] <- "Bottna"
electiondata["kommun"][electiondata["kommun"] == "TANUM"] <- "Tanum"
electiondata["kommun"][electiondata["kommun"] == "LUR"] <- "Lur"
electiondata["kommun"][electiondata["kommun"] == "GREBBEKG"] <- "GREBBEKG"
electiondata["kommun"][electiondata["kommun"] == "NAVERSTA"] <- "Nafverstad"
electiondata["kommun"][electiondata["V4"] == "1420020"] <- "Mo-Bohus"

## ÄLVSBORG
electiondata["kommun"][electiondata["kommun"] == "VTUNHEM"] <- "Vestra Tunhem"
electiondata["kommun"][electiondata["kommun"] == "NBJOERKE"] <- "Norra Björke"
electiondata["kommun"][electiondata["kommun"] == "VAENEAAS"] <- "Väne-Åsaka"
electiondata["kommun"][electiondata["kommun"] == "GAERDHEM"] <- "Gerdhem"
electiondata["kommun"][electiondata["kommun"] == "VASSAEND"] <- "Vassända-Naglum"
electiondata["kommun"][electiondata["kommun"] == "VAENERYR"] <- "Väne-Ryr"
electiondata["kommun"][electiondata["V4"] == "1502010"] <- "Stora Mellby"
electiondata["kommun"][electiondata["kommun"] == "MAGRA"] <- "Magra"
electiondata["kommun"][electiondata["kommun"] == "ERSKA"] <- "Erska"
electiondata["kommun"][electiondata["kommun"] == "LAGMANSE"] <- "Lagmansered"
electiondata["kommun"][electiondata["kommun"] == "ROMMELE"] <- "Rommele"
electiondata["kommun"][electiondata["V4"] == "1503020"] <- "Fors-Flundre"
electiondata["kommun"][electiondata["kommun"] == "UPPHAERA"] <- "Upphärad"
electiondata["kommun"][electiondata["kommun"] == "FUXERNA"] <- "Fuxerna"
electiondata["kommun"][electiondata["kommun"] == "AASBRAEC"] <- "Åsbräcka"
electiondata["kommun"][electiondata["kommun"] == "SKEPPLAN"] <- "Skepplanda"
electiondata["kommun"][electiondata["kommun"] == "HAALANDA"] <- "Hålanda"
electiondata["kommun"][electiondata["kommun"] == "ALESKOEV"] <- "Ale-Skövde"
electiondata["kommun"][electiondata["kommun"] == "STPETER"] <- "St Peter"
electiondata["kommun"][electiondata["kommun"] == "TUNGE"] <- "Tunge"
electiondata["kommun"][electiondata["kommun"] == "STARRKAE"] <- "Starrkärr"
electiondata["kommun"][electiondata["kommun"] == "KILANDA"] <- "Kilanda"
electiondata["kommun"][electiondata["kommun"] == "NOEDINGE"] <- "Nödinge"
electiondata["kommun"][electiondata["kommun"] == "OESTAD"] <- "Östad"
electiondata["kommun"][electiondata["kommun"] == "STORALUN"] <- "Stora Lundby"
electiondata["kommun"][electiondata["kommun"] == "SKALLSJO"] <- "Skallsjö"
electiondata["kommun"][electiondata["kommun"] == "LERUM"] <- "Lerum"
electiondata["kommun"][electiondata["kommun"] == "ANGERED"] <- "Angered"
electiondata["kommun"][electiondata["kommun"] == "BERGUM"] <- "Bergum"
electiondata["kommun"][electiondata["kommun"] == "HERRLJUN"] <- "Herrljunga"
electiondata["kommun"][electiondata["kommun"] == "TARSLED"] <- "Tarsled"
electiondata["kommun"][electiondata["kommun"] == "REMMENE"] <- "Remmene"
electiondata["kommun"][electiondata["kommun"] == "FOELENE"] <- "Fölene"
electiondata["kommun"][electiondata["kommun"] == "EGGVENA"] <- "Eggvena"
electiondata["kommun"][electiondata["kommun"] == "ALGUTSTO"] <- "Algutstorp"
electiondata["kommun"][electiondata["kommun"] == "KULLINGS"] <- "Kullings-Skövde"
electiondata["kommun"][electiondata["kommun"] == "TUMBERG"] <- "Tumberg"
electiondata["kommun"][electiondata["kommun"] == "SHAERENE"] <- "Södra Härene"
electiondata["kommun"][electiondata["kommun"] == "BRAATTEN"] <- "Bråttensby"
electiondata["kommun"][electiondata["kommun"] == "HOL"] <- "Hol"
electiondata["kommun"][electiondata["kommun"] == "SIENE"] <- "Siene"
electiondata["kommun"][electiondata["kommun"] == "HORLA"] <- "Horla"
electiondata["kommun"][electiondata["kommun"] == "SKOGSBYG"] <- "Skogsbygden"
electiondata["kommun"][electiondata["V4"] == "1506170"] <- "Lena-Kulling"
electiondata["kommun"][electiondata["kommun"] == "BERGSTEN"] <- "Bergstena"
electiondata["kommun"][electiondata["kommun"] == "FULLESTA"] <- "Fullestad"
electiondata["kommun"][electiondata["kommun"] == "LAANGARE"] <- "Långared"
electiondata["kommun"][electiondata["V4"] == "1506230"] <- "Alingsås LF"
electiondata["kommun"][electiondata["V4"] == "1506240"] <- "Bälinge-Älvsborg"
electiondata["kommun"][electiondata["kommun"] == "OEDENAES"] <- "Ödenäs"
electiondata["kommun"][electiondata["kommun"] == "HEMSJOE"] <- "Hemsjö"
electiondata["kommun"][electiondata["kommun"] == "SBJOERK"] <- "Södra Björke"
electiondata["kommun"][electiondata["kommun"] == "VESENE"] <- "Vesene"
electiondata["kommun"][electiondata["kommun"] == "GRUDE"] <- "Grude"
electiondata["kommun"][electiondata["kommun"] == "JAALLBY"] <- "Gällby"
electiondata["kommun"][electiondata["kommun"] == "HUDENE"] <- "Hudene"
electiondata$kommun[electiondata$kommun == "HAELLEST" & electiondata$V4 == "1507060"] <- "Hellestad-Älvsborg"
electiondata["kommun"][electiondata["kommun"] == "SKOELVEN"] <- "Skölfvene"
electiondata["kommun"][electiondata["V4"] == "1507100"] <- "Hov-Gäsene"
electiondata["kommun"][electiondata["kommun"] == "NSAEM"] <- "Norra Säm"
electiondata["kommun"][electiondata["V4"] == "1507120"] <- "Källunga"
electiondata["kommun"][electiondata["kommun"] == "ERIKSBER"] <- "Eriksberg"
electiondata["kommun"][electiondata["kommun"] == "BRODDARP"] <- "Broddarp"
electiondata["kommun"][electiondata["kommun"] == "MJAELDRU"] <- "Mjeldrunga"
electiondata["kommun"][electiondata["kommun"] == "OD"] <- "Od"
electiondata["kommun"][electiondata["kommun"] == "OERA"] <- "Öra"
electiondata["kommun"][electiondata["kommun"] == "ALBOGA"] <- "Alboga"
electiondata["kommun"][electiondata["kommun"] == "MOLLA"] <- "Molla"
electiondata["kommun"][electiondata["kommun"] == "NAARUNG"] <- "Nårunga"
electiondata["kommun"][electiondata["kommun"] == "LJUR"] <- "Ljur"
electiondata["kommun"][electiondata["kommun"] == "ORNUNGA"] <- "Ornunga"
electiondata["kommun"][electiondata["kommun"] == "KVINNEST"] <- "Kvinnestad"
electiondata["kommun"][electiondata["kommun"] == "ASKLANDA"] <- "Asklanda"
electiondata["kommun"][electiondata["kommun"] == "RAANGEDA"] <- "Rångedala"
electiondata["kommun"][electiondata["kommun"] == "TOARP"] <- "Toarp"
electiondata["kommun"][electiondata["kommun"] == "AESPERED"] <- "Espered"
electiondata["kommun"][electiondata["kommun"] == "TAERBY"] <- "Tärby"
electiondata["kommun"][electiondata["V4"] == "1508050"] <- "Varnum-Älvsborg"
electiondata["kommun"][electiondata["kommun"] == "BRAEMHUL"] <- "Brämhult"
electiondata["kommun"][electiondata["kommun"] == "GINGRI"] <- "Gingri"
electiondata["kommun"][electiondata["kommun"] == "SVING"] <- "Södra Ving"
electiondata["kommun"][electiondata["kommun"] == "HAERNA"] <- "Härna"
electiondata["kommun"][electiondata["kommun"] == "FAENNESL"] <- "Fenneslunda"
electiondata["kommun"][electiondata["kommun"] == "GROVARE"] <- "Grovare"
electiondata["kommun"][electiondata["kommun"] == "HAELLSTA"] <- "Hällstad"
electiondata["kommun"][electiondata["kommun"] == "MURUM"] <- "Murum"
electiondata["kommun"][electiondata["kommun"] == "SVAANGA"] <- "Södra Vånga"
electiondata["kommun"][electiondata["kommun"] == "MOENE"] <- "Möne"
electiondata["kommun"][electiondata["kommun"] == "KAERRAAK"] <- "Kärråkra"
electiondata["kommun"][electiondata["kommun"] == "SEGLORA"] <- "Seglora"
electiondata["kommun"][electiondata["kommun"] == "FRISSLA"] <- "Fritsla"
electiondata["kommun"][electiondata["kommun"] == "KINNARUM"] <- "Kinnarumma"
electiondata["kommun"][electiondata["kommun"] == "SKEPPHUL"] <- "Skepphult"
electiondata["kommun"][electiondata["kommun"] == "OERBY"] <- "Örby"
electiondata["kommun"][electiondata["kommun"] == "KINNA"] <- "Kinna"
electiondata["kommun"][electiondata["kommun"] == "TORESTOR"] <- "Torestorp"
electiondata["kommun"][electiondata["kommun"] == "OEXABAEC"] <- "Öxabäck"
electiondata["kommun"][electiondata["kommun"] == "AELEKULL"] <- "Ellekulla"
electiondata["kommun"][electiondata["kommun"] == "KUNGSAET"] <- "Kungsäter"
electiondata["kommun"][electiondata["kommun"] == "GUNNARSJ"] <- "Gunnarsjö"
electiondata["kommun"][electiondata["kommun"] == "GRIMMARE"] <- "Grimmared"
electiondata["kommun"][electiondata["V4"] == "1509150"] <- "Karl Gustav-Mark"
electiondata["kommun"][electiondata["kommun"] == "ISTORP"] <- "Istorp"
electiondata["kommun"][electiondata["kommun"] == "OEXNEVAL"] <- "Öxnevalla"
electiondata["kommun"][electiondata["kommun"] == "HORRED"] <- "Horred"
electiondata["kommun"][electiondata["kommun"] == "SAETILA"] <- "Sätila"
electiondata["kommun"][electiondata["kommun"] == "HYSSNA"] <- "Hysna"
electiondata["kommun"][electiondata["kommun"] == "BERGHEM"] <- "Berghem"
electiondata["kommun"][electiondata["kommun"] == "HAJOM"] <- "Hajom"
electiondata["kommun"][electiondata["kommun"] == "SURTEBY"] <- "Surteby"
electiondata["kommun"][electiondata["kommun"] == "KATTUNGA"] <- "Kattunga"
electiondata["kommun"][electiondata["kommun"] == "FOTSKAEL"] <- "Fotskäl"
electiondata["kommun"][electiondata["kommun"] == "TOSTARED"] <- "Tostared"
electiondata["kommun"][electiondata["kommun"] == "SURKAT"] <- "SURKAT"
electiondata["kommun"][electiondata["kommun"] == "BOLLEBYG"] <- "Bollebygd"
electiondata["kommun"][electiondata["kommun"] == "BJOERKET"] <- "Björketorp"
electiondata["kommun"][electiondata["kommun"] == "TOELLSJO"] <- "Töllsjö"
electiondata["kommun"][electiondata["kommun"] == "FRISTAD"] <- "Fristad"
electiondata["kommun"][electiondata["kommun"] == "BORGSTEN"] <- "Borgstena" 
electiondata$kommun[electiondata$kommun == "TORPA" & electiondata$V4 == "1511030"] <- "Torpa-Älvsborg"
electiondata["kommun"][electiondata["kommun"] == "BREEDARE"] <- "Bredared-Veden"
electiondata["kommun"][electiondata["kommun"] == "TAEMTA"] <- "Tämta"
electiondata["kommun"][electiondata["kommun"] == "VAENGA"] <- "Vänga"
electiondata["kommun"][electiondata["kommun"] == "SANDHULT"] <- "Sandhult"
electiondata["kommun"][electiondata["kommun"] == "NAASARP"] <- "Norra Åsarp"
electiondata["kommun"][electiondata["kommun"] == "KOELABY"] <- "Kölaby"
electiondata["kommun"][electiondata["V4"] == "1512030"] <- "Solberga-Älvsborg"
electiondata["kommun"][electiondata["kommun"] == "SMULA"] <- "Smula"
electiondata["kommun"][electiondata["kommun"] == "BLIDSBER"] <- "Blidsberg"
electiondata["kommun"][electiondata["kommun"] == "DALUM"] <- "Dalum"
electiondata["kommun"][electiondata["kommun"] == "HUMLA"] <- "Humla"
electiondata["kommun"][electiondata["kommun"] == "TIMMELE"] <- "Timmele"
electiondata$kommun[electiondata$kommun == "VIST" & electiondata$V4 == "1512110"] <- "Vist-Älvsborg"
electiondata["kommun"][electiondata["kommun"] == "BRUNN"] <- "Brunn"
electiondata["kommun"][electiondata["kommun"] == "BOENE"] <- "Böne"
electiondata["kommun"][electiondata["kommun"] == "KNAATTE"] <- "Knätte"
electiondata["kommun"][electiondata["kommun"] == "LIARED"] <- "Liared"
electiondata["kommun"][electiondata["V4"] == "1512160"] <- "Kölingared"
electiondata["kommun"][electiondata["kommun"] == "FIVLERED"] <- "Fiflered"
electiondata["kommun"][electiondata["kommun"] == "HOESSNA"] <- "Hössna"
electiondata["kommun"][electiondata["kommun"] == "GULLERED"] <- "Gullered"
electiondata["kommun"][electiondata["kommun"] == "STRAENGS"] <- "Strengsered"
electiondata["kommun"][electiondata["kommun"] == "KALV"] <- "Kalv"
electiondata["kommun"][electiondata["kommun"] == "MAARDAKL"] <- "Mårdaklev"
electiondata["kommun"][electiondata["kommun"] == "HAACKSVI"] <- "Håksvik"
electiondata["kommun"][electiondata["kommun"] == "OEFROELU"] <- "Östra Frölunda"
electiondata["kommun"][electiondata["kommun"] == "MJOEBAEC"] <- "Mjöbäck"
electiondata["kommun"][electiondata["kommun"] == "HOLSSJUN"] <- "Holtsljunga"
electiondata["kommun"][electiondata["kommun"] == "AELVSERE"] <- "Elvsered"
electiondata["kommun"][electiondata["kommun"] == "SVENLJUN"] <- "Svenljunga"
electiondata["kommun"][electiondata["kommun"] == "ULLASJOE"] <- "Ullasjö"
electiondata["kommun"][electiondata["kommun"] == "OERSAAS"] <- "Örsås"
electiondata["kommun"][electiondata["kommun"] == "REVESJOE"] <- "Revesjö"
electiondata["kommun"][electiondata["kommun"] == "REDSLARE"] <- "Redslared"
electiondata["kommun"][electiondata["kommun"] == "SEXDREGA"] <- "Sexdrega"
electiondata["kommun"][electiondata["kommun"] == "LJUSHULT"] <- "Ljushult"
electiondata["kommun"][electiondata["kommun"] == "ROASJOE"] <- "Roasjö"
electiondata["kommun"][electiondata["kommun"] == "HILLARED"] <- "Hillared"
electiondata["kommun"][electiondata["kommun"] == "LAENGHEM"] <- "Länghem"
electiondata["kommun"][electiondata["kommun"] == "DANNIKE"] <- "Dannike"
electiondata["kommun"][electiondata["kommun"] == "MAANSTAD"] <- "Månstad"
electiondata["kommun"][electiondata["kommun"] == "SAASARP"] <- "Södra Åsarp"
electiondata["kommun"][electiondata["kommun"] == "GAELLSTA"] <- "Gällstad"
electiondata["kommun"][electiondata["kommun"] == "GROENAH"] <- "Grönahög"
electiondata["kommun"][electiondata["kommun"] == "SSAEM"] <- "Södra Säm"
electiondata["kommun"][electiondata["kommun"] == "FINNEKUM"] <- "Finnekumla"
electiondata["kommun"][electiondata["kommun"] == "TVAERRED"] <- "Tvärred"
electiondata$kommun[electiondata$kommun == "MARBAECK" & electiondata$V4 == "1513320"] <- "Marbäck-Älvsborg"
electiondata["kommun"][electiondata["kommun"] == "DALSTORP"] <- "Dalstorp"
electiondata["kommun"][electiondata["kommun"] == "HULARED"] <- "Hulared"
electiondata["kommun"][electiondata["kommun"] == "OELSREMM"] <- "Ölsremma"
electiondata["kommun"][electiondata["kommun"] == "LJUNGSAR"] <- "Ljungsarp"
electiondata["kommun"][electiondata["kommun"] == "NITTORP"] <- "Nittorp"
electiondata["kommun"][electiondata["kommun"] == "TRANEMO"] <- "Tranemo"
electiondata["kommun"][electiondata["kommun"] == "MOSSEBO"] <- "Måssebo"
electiondata["kommun"][electiondata["kommun"] == "AMBJOERN"] <- "Ambjörnarp"
electiondata["kommun"][electiondata["kommun"] == "SJOETOFT"] <- "Sjötofta"
electiondata["kommun"][electiondata["kommun"] == "BOLSTAD"] <- "Bolstad"
electiondata["kommun"][electiondata["kommun"] == "GRINSTAD"] <- "Grinstad"
electiondata["kommun"][electiondata["kommun"] == "GESTAD"] <- "Gestad"
electiondata["kommun"][electiondata["kommun"] == "ERIKSTAD"] <- "Erikstad"
electiondata["kommun"][electiondata["kommun"] == "FRAENDEF"] <- "Frändefors"
electiondata["kommun"][electiondata["kommun"] == "BRAALAND"] <- "Brålanda"
electiondata["kommun"][electiondata["kommun"] == "SUNDALSR"] <- "Sundals-Ryr"
electiondata["kommun"][electiondata["V4"] == "1515010"] <- "Ör-Nordal"
electiondata["kommun"][electiondata["kommun"] == "GUNNARSN"] <- "Gunnarsnäs"
electiondata["kommun"][electiondata["kommun"] == "DALSKOG"] <- "Dalskog"
electiondata["kommun"][electiondata["kommun"] == "SKAALLER"] <- "Skållerud"
electiondata["kommun"][electiondata["V4"] == "1515050"] <- "Holm-Nordal"
electiondata["kommun"][electiondata["kommun"] == "JAERN"] <- "Jern"
electiondata["kommun"][electiondata["kommun"] == "MELLERKG"] <- "MELLERKG"
electiondata$kommun[electiondata$kommun == "TORP" & electiondata$V4 == "1516010"] <- "Torp-Älvsborg"
electiondata["kommun"][electiondata["kommun"] == "VALBORYR"] <- "Valbo-Ryr"
electiondata["kommun"][electiondata["kommun"] == "FAERGELA"] <- "Färgelanda"
electiondata["kommun"][electiondata["kommun"] == "OEDEBORG"] <- "Ödeborg"
electiondata["kommun"][electiondata["kommun"] == "HOEGSAET"] <- "Högsäter"
electiondata["kommun"][electiondata["kommun"] == "RAENNELA"] <- "Rennelanda"
electiondata["kommun"][electiondata["kommun"] == "RAAGGAER"] <- "Råggärd"
electiondata["kommun"][electiondata["kommun"] == "LERDAL"] <- "Lerdal"
electiondata["kommun"][electiondata["kommun"] == "JAERBO" & electiondata$V4 == "1516110"] <- "Järbo-Valbo"
electiondata["kommun"][electiondata["kommun"] == "ROELANDA"] <- "Rölanda"
electiondata["kommun"][electiondata["kommun"] == "GESAETER"] <- "Gesäter"
electiondata["kommun"][electiondata["kommun"] == "DALSED"] <- "Dals-Ed"
electiondata["kommun"][electiondata["kommun"] == "TOEFTEDA"] <- "Töftedal"
electiondata["kommun"][electiondata["kommun"] == "NOESSEMA"] <- "Nössemark"
electiondata["kommun"][electiondata["kommun"] == "HAABOL"] <- "Håbol"
electiondata["kommun"][electiondata["kommun"] == "VAARVIK"] <- "Vårvik"
electiondata["kommun"][electiondata["kommun"] == "TORRSKOG"] <- "Torrskog"
electiondata["kommun"][electiondata["kommun"] == "LAXARBY"] <- "Laxarby"
electiondata["kommun"][electiondata["kommun"] == "STENEBY"] <- "Steneby"
electiondata["kommun"][electiondata["kommun"] == "AERTEMAR"] <- "Ärtemark"
electiondata["kommun"][electiondata["kommun"] == "OEDSKOEL"] <- "Ödsköld"
electiondata["kommun"][electiondata["kommun"] == "BAECKE"] <- "Bäcke"
electiondata["kommun"][electiondata["kommun"] == "TISSELSK"] <- "Tisselskog"
electiondata["kommun"][electiondata["kommun"] == "EDSLESKO"] <- "Edsleskog"
electiondata["kommun"][electiondata["V4"] == "1518020"] <- "Mo-Älvsborg"
electiondata["kommun"][electiondata["kommun"] == "FROESKOG"] <- "Fröskog"
electiondata["kommun"][electiondata["kommun"] == "AAMAALLK"] <- "Åmål LF"
electiondata["kommun"][electiondata["kommun"] == "TOESSE"] <- "Tössö"
electiondata["kommun"][electiondata["kommun"] == "TYDJE"] <- "Tydje"
electiondata["kommun"][electiondata["kommun"] == "AANIMSKO"] <- "Ånimskog"
electiondata["kommun"][electiondata["kommun"] == "TROLLHAE"] <- "Trollhättan"


## SKARABORG
electiondata["kommun"][electiondata["V4"] == "1601010"] <- "Ekby-Skaraborg"
electiondata["kommun"][electiondata["kommun"] == "UTBY"] <- "Utby"
electiondata["kommun"][electiondata["kommun"] == "ULLERVAD"] <- "Ullervad"
electiondata["kommun"][electiondata["kommun"] == "EK"] <- "Ek"
electiondata["kommun"][electiondata["kommun"] == "LEKSBERG"] <- "Leksberg"
electiondata["kommun"][electiondata["V4"] == "1601060"] <- "Björsäter-Skaraborg"
electiondata["kommun"][electiondata["kommun"] == "TORSOE"] <- "Torsö"
electiondata["kommun"][electiondata["kommun"] == "TOEREBOK"] <- "TOEREBOK"
electiondata["kommun"][electiondata["kommun"] == "HASSLEEN"] <- "Hassle"
electiondata["kommun"][electiondata["kommun"] == "FAERED"] <- "Färed"
electiondata["kommun"][electiondata["kommun"] == "FREDSBER"] <- "Fredsberg"
electiondata["kommun"][electiondata["kommun"] == "BJOERKAE"] <- "Björkäng"
electiondata["kommun"][electiondata["kommun"] == "BAECK"] <- "Bäck"
electiondata["kommun"][electiondata["kommun"] == "LYRESTAD"] <- "Lyrestad"
electiondata["kommun"][electiondata["kommun"] == "AMNEHAER"] <- "Amnehärad"
electiondata["kommun"][electiondata["kommun"] == "HOVA"] <- "Hova"
electiondata["kommun"][electiondata["kommun"] == "FINNEROE"] <- "Finnerödja"
electiondata["kommun"][electiondata["kommun"] == "AELGARAA"] <- "Elgarås"
electiondata$kommun[electiondata$kommun == "HORN" & electiondata$V4 == "1601220"] <- "Horn-Skaraborg"
electiondata["kommun"][electiondata["kommun"] == "FROESVE"] <- "Frösve"
electiondata["kommun"][electiondata["V4"] == "1601240"] <- "Säter-Skaraborg"
electiondata["kommun"][electiondata["kommun"] == "ODENSAAK"] <- "Odensåker"
electiondata["kommun"][electiondata["kommun"] == "TIDAVAD"] <- "Tidavad"
electiondata["kommun"][electiondata["kommun"] == "LAASTAD"] <- "Låstad"
electiondata["kommun"][electiondata["kommun"] == "BINNEBER"] <- "Binneberg"
electiondata["kommun"][electiondata["V4"] == "1601310"] <- "Flistad-Skaraborg"
electiondata["kommun"][electiondata["V4"] == "1601320"] <- "Götlunda-Skaraborg"
electiondata["kommun"][electiondata["kommun"] == "VAERING"] <- "Väring"
electiondata["kommun"][electiondata["kommun"] == "LOCKETOR"] <- "Locketorp"
electiondata["kommun"][electiondata["V4"] == "1601350"] <- "Berg-Skaraborg"
electiondata["kommun"][electiondata["kommun"] == "LERDALA"] <- "Lerdala"
electiondata["kommun"][electiondata["kommun"] == "BOEJA"] <- "Böja"
electiondata["kommun"][electiondata["kommun"] == "TIMMERSD"] <- "Timmersdala"
electiondata["kommun"][electiondata["kommun"] == "FAEGRE"] <- "Fägre"
electiondata["kommun"][electiondata["kommun"] == "TRAESTEN"] <- "Trästena"
electiondata["kommun"][electiondata["kommun"] == "UNDENAES"] <- "Undenäs"
electiondata["kommun"][electiondata["kommun"] == "HALNA"] <- "Halna"
electiondata["kommun"][electiondata["kommun"] == "TIVED"] <- "Tived"
electiondata["kommun"][electiondata["kommun"] == "RANSBERG"] <- "Ransberg"
electiondata["kommun"][electiondata["kommun"] == "MOELLTOR"] <- "Mölltorp"
electiondata["kommun"][electiondata["kommun"] == "KARLSBOR"] <- "Karlsborg"
electiondata["kommun"][electiondata["kommun"] == "BAELLEFO"] <- "Bellefors"
electiondata["kommun"][electiondata["kommun"] == "BEATEBER"] <- "Beateberg"
electiondata["kommun"][electiondata["kommun"] == "EKESKOG"] <- "Ekeskog"
electiondata["kommun"][electiondata["kommun"] == "HJAELSTA"] <- "Hjälstad"
electiondata["kommun"][electiondata["V4"] == "1601550"] <- "Mo-Skaraborg"
electiondata["kommun"][electiondata["kommun"] == "VAD"] <- "Vad"
electiondata["kommun"][electiondata["V4"] == "1601570"] <- "Svenneby-Skaraborg"
electiondata["kommun"][electiondata["kommun"] == "OEM"] <- "OEM"
electiondata["kommun"][electiondata["kommun"] == "RYD"] <- "Ryd"
electiondata["kommun"][electiondata["kommun"] == "HAGELBER"] <- "Hagelberg"
electiondata["kommun"][electiondata["kommun"] == "NKYRKETO"] <- "Norra Kyrketorp"
electiondata["kommun"][electiondata["V4"] == "1602060"] <- "Våmb-Skaraborg"
electiondata["kommun"][electiondata["kommun"] == "SVENTORP"] <- "Sventorp"
electiondata["kommun"][electiondata["kommun"] == "FORSBY"] <- "Forsby"
electiondata["kommun"][electiondata["kommun"] == "VAROLA"] <- "Varola"
electiondata["kommun"][electiondata["kommun"] == "VAERSAAS"] <- "Värsås"
electiondata["kommun"][electiondata["kommun"] == "KYRKEFAL"] <- "Kyrkefalla"
electiondata["kommun"][electiondata["kommun"] == "MOFALLA"] <- "Mofalla"
electiondata["kommun"][electiondata["kommun"] == "GREVBAEC"] <- "Gredbäck"
electiondata["kommun"][electiondata["kommun"] == "BREDVIK"] <- "Bredvik"
electiondata["kommun"][electiondata["kommun"] == "NFAAGEL"] <- "Norra Fågelås"
electiondata["kommun"][electiondata["kommun"] == "SFAAGEL"] <- "Södra Fågelås"
electiondata["kommun"][electiondata["kommun"] == "HJOLK"] <- "Hjo LF"
electiondata["kommun"][electiondata["kommun"] == "GUDHEM"] <- "Gudhem"
electiondata["kommun"][electiondata["kommun"] == "OETUNHEM"] <- "Östra Tunhem"
electiondata["kommun"][electiondata["kommun"] == "UGGLUM"] <- "Ugglum"
electiondata["kommun"][electiondata["kommun"] == "TORBJOER"] <- "Torbjörntorp"
electiondata["kommun"][electiondata["kommun"] == "FRIGGER"] <- "Friggeråker"
electiondata["kommun"][electiondata["kommun"] == "FALKGVLK"] <- "Falköping västra LF"
electiondata["kommun"][electiondata["kommun"] == "FALKGOEL"] <- "Falköping östra LF"
electiondata["kommun"][electiondata["kommun"] == "BJURUM"] <- "Bjurum"
electiondata["kommun"][electiondata["kommun"] == "BRODDETO"] <- "Broddetorp"
electiondata["kommun"][electiondata["kommun"] == "HORNBORG"] <- "Hornborga"
electiondata["kommun"][electiondata["kommun"] == "SAETUNA"] <- "Sätuna"
electiondata["kommun"][electiondata["V4"] == "1603130"] <- "Segerstad-Skaraborg"
electiondata["kommun"][electiondata["kommun"] == "HAAKANTO"] <- "Håkantorp"
electiondata["kommun"][electiondata["kommun"] == "VALTORP"] <- "Valtorp"
electiondata["kommun"][electiondata["kommun"] == "STENSTOR"] <- "Stenstorp"
electiondata["kommun"][electiondata["kommun"] == "SKYRKETO"] <- "Södra Kyrketorp"
electiondata["kommun"][electiondata["kommun"] == "BRUNNHEM"] <- "Brunnhem"
electiondata["kommun"][electiondata["kommun"] == "DALA"] <- "Dala"
electiondata["kommun"][electiondata["kommun"] == "HOEGSTEN"] <- "Högstena"
electiondata["kommun"][electiondata["kommun"] == "BORGUNDA"] <- "Borgunda"
electiondata["kommun"][electiondata["kommun"] == "SJOGERST"] <- "Sjogerstad"
electiondata["kommun"][electiondata["kommun"] == "RAADENE"] <- "Rådene"
electiondata["kommun"][electiondata["kommun"] == "LJUNGHEM"] <- "Ljunghem"
electiondata["kommun"][electiondata["kommun"] == "EDAASA"] <- "Edåsa"
electiondata["kommun"][electiondata["kommun"] == "BJAERKA"] <- "Bjerka"
electiondata["kommun"][electiondata["kommun"] == "AASLE"] <- "Åsle"
electiondata["kommun"][electiondata["kommun"] == "MULARP"] <- "Mularp"
electiondata["kommun"][electiondata["kommun"] == "TIARP"] <- "Tiarp"
electiondata["kommun"][electiondata["V4"] == "1604040"] <- "Varv-Skaraborg"
electiondata["kommun"][electiondata["kommun"] == "KUNGSLEN"] <- "Kungslena"
electiondata["kommun"][electiondata["kommun"] == "HOEMB"] <- "Hömb"
electiondata["kommun"][electiondata["kommun"] == "DIMBO"] <- "Dimbo"
electiondata["kommun"][electiondata["kommun"] == "OTTRAVAD"] <- "Ottravad"
electiondata["kommun"][electiondata["kommun"] == "ACKLINGA"] <- "Acklinga"
electiondata["kommun"][electiondata["kommun"] == "AGNETORO"] <- "Agnetorp"
electiondata["kommun"][electiondata["kommun"] == "BALTAK"] <- "Baltak"
electiondata["kommun"][electiondata["kommun"] == "FROEJERE"] <- "Fröjered"
electiondata["kommun"][electiondata["kommun"] == "FRIDENE"] <- "Fridene"
electiondata["kommun"][electiondata["V4"] == "1604160"] <- "Korsberga-Skaraborg"
electiondata["kommun"][electiondata["kommun"] == "DARETORP"] <- "Daretorp"
electiondata["kommun"][electiondata["kommun"] == "VELINGE"] <- "Velinge"
electiondata["kommun"][electiondata["kommun"] == "BRANDSTO"] <- "Brandstorp"
electiondata["kommun"][electiondata["kommun"] == "HAANGSDA"] <- "Hångsdala"
electiondata["kommun"][electiondata["kommun"] == "SKOERSTO"] <- "Skörstorp"
electiondata["kommun"][electiondata["kommun"] == "OEGERUM"] <- "Östra Gerum"
electiondata["kommun"][electiondata["kommun"] == "HABO"] <- "Habo"
electiondata["kommun"][electiondata["V4"] == "1604260"] <- "Gustaf Adolf-Skaraborg"
electiondata["kommun"][electiondata["kommun"] == "SANDHEM"] <- "Sandhem"
electiondata["kommun"][electiondata["kommun"] == "UTVAENGS"] <- "Utvängstorp"
electiondata["kommun"][electiondata["kommun"] == "HAERJA"] <- "Härja"
electiondata["kommun"][electiondata["V4"] == "1604320"] <- "Nykyrka-Skaraborg"
electiondata["kommun"][electiondata["V4"] == "1604330"] <- "Kölingared, länsdel"
electiondata["kommun"][electiondata["kommun"] == "BJURBAEC"] <- "Bjurbäck"
electiondata["kommun"][electiondata["V4"] == "1604350"] <- "Valstad"
electiondata["kommun"][electiondata["kommun"] == "VAETTAK"] <- "Vättak"
electiondata["kommun"][electiondata["kommun"] == "KYMBO"] <- "Kymbo"
electiondata["kommun"][electiondata["kommun"] == "SUNTAK"] <- "Suntak"
electiondata["kommun"][electiondata["kommun"] == "YLLESTAD"] <- "Yllestad"  
electiondata["kommun"][electiondata["kommun"] == "VISTORP"] <- "Vistorp"
electiondata["kommun"][electiondata["V4"] == "1604430"] <- "Näs-Skaraborg"
electiondata["kommun"][electiondata["kommun"] == "VARTOFTA"] <- "Vartofta-Åsaka"
electiondata["kommun"][electiondata["kommun"] == "KAELVENE"] <- "Kälvene"
electiondata["kommun"][electiondata["kommun"] == "SLOETA"] <- "Slöta"
electiondata["kommun"][electiondata["kommun"] == "KARLEBY"] <- "Karleby"
electiondata["kommun"][electiondata["kommun"] == "FALKGOEL"] <- "FALKGOEL"
electiondata["kommun"][electiondata["kommun"] == "LUTTRA"] <- "Luttra"
electiondata["kommun"][electiondata["V4"] == "1605010"] <- "Kinneved"
electiondata["kommun"][electiondata["kommun"] == "VAARKUML"] <- "Vårkumla"
electiondata["kommun"][electiondata["kommun"] == "BOERSTIG"] <- "Börstig"
electiondata["kommun"][electiondata["kommun"] == "BRISMENE"] <- "Brismene"
electiondata["kommun"][electiondata["kommun"] == "NVAANGA"] <- "Norra Vånga"
electiondata["kommun"][electiondata["kommun"] == "HAERJEVA"] <- "Härjevad"
electiondata["kommun"][electiondata["kommun"] == "TRAESSBE"] <- "Trässberg"
electiondata["kommun"][electiondata["kommun"] == "JUNG"] <- "Jung"
electiondata["kommun"][electiondata["kommun"] == "FYRUNGA"] <- "Fyrunga"
electiondata["kommun"][electiondata["kommun"] == "OETTUM"] <- "Öttum"
electiondata["kommun"][electiondata["kommun"] == "VINKOEL"] <- "Vinköl"
electiondata["kommun"][electiondata["kommun"] == "MARUM"] <- "Marum"
electiondata["kommun"][electiondata["kommun"] == "SALEBY"] <- "Saleby"
electiondata["kommun"][electiondata["kommun"] == "EDSVAERA"] <- "Edsvära"
electiondata["kommun"][electiondata["kommun"] == "KVAENUM"] <- "Kvänum"
electiondata["kommun"][electiondata["kommun"] == "SYNNERBY"] <- "Synnerby"
electiondata["kommun"][electiondata["kommun"] == "SKALLMEJ"] <- "Skallmeja"
electiondata["kommun"][electiondata["kommun"] == "VGERUM"] <- "Vestra Gerum"
electiondata["kommun"][electiondata["kommun"] == "SKAANING"] <- "Skånings-Åsaka"
electiondata["kommun"][electiondata["kommun"] == "HAENDENE"] <- "Händene"
electiondata["kommun"][electiondata["V4"] == "1606210"] <- "Härlunda-Skaraborg"
electiondata["kommun"][electiondata["kommun"] == "SKARALK"] <- "Skara LF"
electiondata["kommun"][electiondata["kommun"] == "VILSKEKL"] <- "Vilske-Kleva"
electiondata["kommun"][electiondata["kommun"] == "ULLENE"] <- "Ullene"
electiondata["kommun"][electiondata["kommun"] == "GOEKHEM"] <- "Gökhem"
electiondata["kommun"][electiondata["kommun"] == "MARKA"] <- "Marka"
electiondata["kommun"][electiondata["V4"] == "1607050"] <- "Sörby-Skaraborg"
electiondata["kommun"][electiondata["kommun"] == "FLOBY"] <- "Floby"
electiondata["kommun"][electiondata["kommun"] == "GOETEVE"] <- "Göteve"
electiondata["kommun"][electiondata["kommun"] == "TRAEVATT"] <- "Trevattna"
electiondata["kommun"][electiondata["kommun"] == "JAELA"] <- "Jäla"
electiondata["kommun"][electiondata["kommun"] == "GROLANDA"] <- "Grolanda"
electiondata["kommun"][electiondata["kommun"] == "NVING"] <- "Norra Ving"
electiondata["kommun"][electiondata["kommun"] == "STENUM"] <- "Stenum"
electiondata["kommun"][electiondata["kommun"] == "SKAERV"] <- "Skärv"
electiondata["kommun"][electiondata["kommun"] == "SKARKE"] <- "Skarke"
electiondata["kommun"][electiondata["kommun"] == "EGGBY"] <- "Eggby"
electiondata["kommun"][electiondata["kommun"] == "ISTRUM"] <- "Istrum"
electiondata["kommun"][electiondata["kommun"] == "OEGLUNDA"] <- "Öglunda"
electiondata["kommun"][electiondata["kommun"] == "NLUNDBY"] <- "Norra Lundby"
electiondata["kommun"][electiondata["kommun"] == "HAEGGUM"] <- "Häggum"
electiondata["kommun"][electiondata["kommun"] == "BOLUM"] <- "Bolum"
electiondata["kommun"][electiondata["kommun"] == "SAERESTA"] <- "Särestad"
electiondata["kommun"][electiondata["kommun"] == "TAENG"] <- "Täng"
electiondata["kommun"][electiondata["kommun"] == "H$LE"] <- "Håle"     
electiondata["kommun"][electiondata["kommun"] == "FLO"] <- "Flo"
electiondata$kommun[electiondata$kommun == "AAS" & electiondata$V4 == "1609050"] <- "Ås-Skaraborg"
electiondata["kommun"][electiondata["kommun"] == "SAL"] <- "Sal"
electiondata["kommun"][electiondata["kommun"] == "VAENERSN"] <- "Vänersnäs"
electiondata["kommun"][electiondata["kommun"] == "TUN"] <- "Tun"
electiondata["kommun"][electiondata["kommun"] == "KARABY"] <- "Karaby"
electiondata["kommun"][electiondata["kommun"] == "FRIEL"] <- "Friel"
electiondata["kommun"][electiondata["kommun"] == "TENGENE"] <- "Tengene"
electiondata["kommun"][electiondata["kommun"] == "TROEKOER"] <- "Trökörna"
electiondata["kommun"][electiondata["V4"] == "1610030"] <- "Malma-Skaraborg"
electiondata["kommun"][electiondata["kommun"] == "LAENGNUM"] <- "Längnum"
electiondata["kommun"][electiondata["kommun"] == "HYRINGA"] <- "Hyringa"
electiondata["kommun"][electiondata["kommun"] == "FRAEMMES"] <- "Främmestad"
electiondata["kommun"][electiondata["kommun"] == "BAEREBER"] <- "Bäreberg"
electiondata["kommun"][electiondata["kommun"] == "GRAESTOK"] <- "GRAESTOK"
electiondata["kommun"][electiondata["kommun"] == "LEVENE"] <- "Levene"
electiondata["kommun"][electiondata["kommun"] == "FLAKEBER"] <- "Flakeberg"
electiondata["kommun"][electiondata["kommun"] == "BJAERBY"] <- "Bjerby"
electiondata["kommun"][electiondata["kommun"] == "SPARLOES"] <- "Sparlösa"
electiondata["kommun"][electiondata["kommun"] == "SLAEDENE"] <- "Slädene"
electiondata["kommun"][electiondata["kommun"] == "ELING"] <- "Eling"
electiondata["kommun"][electiondata["kommun"] == "LEKAASA"] <- "Lekåsa"
electiondata["kommun"][electiondata["kommun"] == "BARNEAAS"] <- "Barne-Åsaka"
electiondata["kommun"][electiondata["kommun"] == "FAAGLUM"] <- "Foglum"
electiondata["kommun"][electiondata["V4"] == "1611050"] <- "Kyrkås-Skaraborg"
electiondata["kommun"][electiondata["kommun"] == "ESSUNGA"] <- "Essunga"
electiondata["kommun"][electiondata["kommun"] == "RYDA"] <- "Ryda"
electiondata["kommun"][electiondata["kommun"] == "SKEDUM"] <- "Södra Kedum"
electiondata["kommun"][electiondata["kommun"] == "NAUM"] <- "Naum"
electiondata["kommun"][electiondata["kommun"] == "LONG"] <- "Long"
electiondata["kommun"][electiondata["kommun"] == "SKARSTAD"] <- "Skarstad"
electiondata["kommun"][electiondata["kommun"] == "HAELLUM"] <- "Hällum"
electiondata["kommun"][electiondata["kommun"] == "OENUM"] <- "Önum"
electiondata["kommun"][electiondata["kommun"] == "VARA"] <- "Vara LF"
electiondata["kommun"][electiondata["kommun"] == "LARV"] <- "Larv"
electiondata["kommun"][electiondata["kommun"] == "LAENGJUM"] <- "Längjum"
electiondata["kommun"][electiondata["kommun"] == "TRAAVAD"] <- "Tråvad"
electiondata["kommun"][electiondata["kommun"] == "SLUNDBY"] <- "Södra Lundby"
electiondata["kommun"][electiondata["kommun"] == "OESTERBI"] <- "Bitterna"
electiondata["kommun"][electiondata["V4"] == "1612060"] <- "Vester-Bitterna"
electiondata["kommun"][electiondata["kommun"] == "LASKEVED"] <- "Laske-Vedum"
electiondata["kommun"][electiondata["kommun"] == "KAELLBY"] <- "Källby"
electiondata["kommun"][electiondata["kommun"] == "BROBY"] <- "Broby"
electiondata["kommun"][electiondata["kommun"] == "SKEBY"] <- "Skeby"
electiondata["kommun"][electiondata["kommun"] == "HANGELOE"] <- "Hangelösa"
electiondata["kommun"][electiondata["kommun"] == "HUSABY"] <- "Husaby"
electiondata["kommun"][electiondata["kommun"] == "SKAELVUM"] <- "Skälvum"
electiondata["kommun"][electiondata["kommun"] == "OVA"] <- "Ova"
electiondata["kommun"][electiondata["kommun"] == "NHAERENE"] <- "Norra Härene"
electiondata["kommun"][electiondata["kommun"] == "HOVBY"] <- "Hovby"
electiondata["kommun"][electiondata["kommun"] == "SAEVARE"] <- "Säfvare"
electiondata["kommun"][electiondata["kommun"] == "LINDAERV"] <- "Lindärfva"
electiondata["kommun"][electiondata["kommun"] == "HASSLOES"] <- "Hasslösa"
electiondata["kommun"][electiondata["kommun"] == "MEDELPLA"] <- "Medelplana"
electiondata["kommun"][electiondata["kommun"] == "VAESTERP"] <- "Vesterplana"
electiondata["kommun"][electiondata["kommun"] == "OESTERPL"] <- "Österplana"
electiondata["kommun"][electiondata["kommun"] == "KESTAD"] <- "Kestad"
electiondata["kommun"][electiondata["kommun"] == "KINNEKLE"] <- "Kinne-Kleva"
electiondata["kommun"][electiondata["kommun"] == "SIL"] <- "Sil"
electiondata["kommun"][electiondata["kommun"] == "GOETENE"] <- "Götene"
electiondata["kommun"][electiondata["kommun"] == "HOLMESTA"] <- "Holmestad"
electiondata["kommun"][electiondata["kommun"] == "VAETTLOE"] <- "Vättlösa"
electiondata["kommun"][electiondata["kommun"] == "LEDSJOE"] <- "Ledsjö"
electiondata["kommun"][electiondata["kommun"] == "FORSHEM"] <- "Forshem"
electiondata["kommun"][electiondata["kommun"] == "FULLOESA"] <- "Fullösa"
electiondata["kommun"][electiondata["V4"] == "1614150"] <- "Kinne-Vedum"
electiondata["kommun"][electiondata["kommun"] == "LUGNAAS"] <- "Lugnås"
electiondata["kommun"][electiondata["kommun"] == "BREDSAET"] <- "Bredsäter"
electiondata["kommun"][electiondata["kommun"] == "JAERPAAS"] <- "Jerpås"
electiondata["kommun"][electiondata["kommun"] == "UVERED"] <- "Uvered"
electiondata["kommun"][electiondata["kommun"] == "HAEGGESL"] <- "Häggesled"
electiondata["kommun"][electiondata["kommun"] == "TAADENE"] <- "Tådene"
electiondata["kommun"][electiondata["kommun"] == "TRANUM"] <- "Tranum"
electiondata["kommun"][electiondata["kommun"] == "LAVAD"] <- "Lavad"     
electiondata["kommun"][electiondata["kommun"] == "NKEDUM"] <- "Norra Kedum"
electiondata["kommun"][electiondata["kommun"] == "OERSLOES"] <- "Örslösa"  
electiondata["kommun"][electiondata["kommun"] == "SOENE"] <- "Söne"
electiondata["kommun"][electiondata["kommun"] == "GILLSTAD"] <- "Gillstad"    
electiondata["kommun"][electiondata["kommun"] == "VAELA"] <- "Väla"
electiondata["kommun"][electiondata["V4"] == "1615140"] <- "Råda-Skaraborg"
electiondata["kommun"][electiondata["kommun"] == "KAALLAND"] <- "Kållands-Åsaka"
electiondata["kommun"][electiondata["V4"] == "1615160"] <- "Mellby-Skaraborg"
electiondata["kommun"][electiondata["kommun"] == "RACKEBY"] <- "Rackeby" 
electiondata["kommun"][electiondata["kommun"] == "SKALUNDA"] <- "Skalunda"
electiondata["kommun"][electiondata["kommun"] == "SUNNERSB"] <- "Sunnersberg" 
electiondata["kommun"][electiondata["kommun"] == "GOESSLUN"] <- "Gösslunda"
electiondata["kommun"][electiondata["kommun"] == "STROE"] <- "Strö"
electiondata["kommun"][electiondata["kommun"] == "OTTERSTA"] <- "Otterstad"   
electiondata["kommun"][electiondata["V4"] == "1621080"] <- "Tidaholm"




## VÄRMLAND
electiondata["kommun"][electiondata["kommun"] == "FAERNEBO"] <- "Fernebo"
electiondata["kommun"][electiondata["kommun"] == "NORDMARK"] <- "Nordmark"  
electiondata["kommun"][electiondata["kommun"] == "RAEMEN"] <- "Rämen"
electiondata["kommun"][electiondata["kommun"] == "BRATTFOR"] <- "Brattfors" 
electiondata["kommun"][electiondata["kommun"] == "GAASBORN"] <- "Gåsborn"
electiondata["kommun"][electiondata["kommun"] == "KROPPA"] <- "Kroppa" 
electiondata["kommun"][electiondata["kommun"] == "LUNGSUND"] <- "Lungsund"
electiondata["kommun"][electiondata["kommun"] == "NYED"] <- "Nyed" 
electiondata["kommun"][electiondata["kommun"] == "AELVSBAC"] <- "Elvsbacka"
electiondata["kommun"][electiondata["kommun"] == "OELME"] <- "Ölme" 
electiondata["kommun"][electiondata["V4"] == "1703020"] <- "Varnum-Vermland"
electiondata["kommun"][electiondata["kommun"] == "VAESE"] <- "Väse" 
electiondata["kommun"][electiondata["kommun"] == "ALSTER"] <- "Alster"
electiondata["kommun"][electiondata["kommun"] == "OEFAAGEL"] <- "Östra Fogelvik" 
electiondata["kommun"][electiondata["kommun"] == "VISNUM"] <- "Visnum"
electiondata["kommun"][electiondata["kommun"] == "VISNUMSK"] <- "Visnums-Kil" 
electiondata["kommun"][electiondata["kommun"] == "RUDSKOGA"] <- "Rudskoga"
electiondata["kommun"][electiondata["V4"] == "1705040"] <- "Nysund-Vermland"
electiondata["kommun"][electiondata["kommun"] == "SRAADA"] <- "Södra Råda"
electiondata["kommun"][electiondata["kommun"] == "STORAKIL"] <- "Stora Kil" 
electiondata["kommun"][electiondata["kommun"] == "FRYKERUD"] <- "Frykerud"
electiondata["kommun"][electiondata["kommun"] == "OEVREULL"] <- "Övre Ullerud" 
electiondata["kommun"][electiondata["kommun"] == "RANSAETE"] <- "Ransäter"
electiondata["kommun"][electiondata["kommun"] == "NEDREULL"] <- "Nedre Ullerud"
electiondata["kommun"][electiondata["V4"] == "1707010"] <- "Karlstad LF"
electiondata["kommun"][electiondata["kommun"] == "GRAVA"] <- "Grava" 
electiondata["kommun"][electiondata["kommun"] == "HAMMAROE"] <- "Hammarö"
electiondata["kommun"][electiondata["kommun"] == "FORSHA"] <- "FORSHA" 
electiondata["kommun"][electiondata["kommun"] == "NOR"] <- "Nor"
electiondata["kommun"][electiondata["V4"] == "1708020"] <- "Segerstad-Vermland"
electiondata["kommun"][electiondata["kommun"] == "GRUMS"] <- "Grums"
electiondata["kommun"][electiondata["kommun"] == "BORGVIK"] <- "Borgvik" 
electiondata["kommun"][electiondata["V4"] == "1708050"] <- "Ed-Grums"
electiondata["kommun"][electiondata["V4"] == "1709010"] <- "Gillberga-Vermland"
electiondata["kommun"][electiondata["kommun"] == "LAANGSER"] <- "Långserud"
electiondata["kommun"][electiondata["kommun"] == "STAVNAES"] <- "Stavnäs" 
electiondata["kommun"][electiondata["kommun"] == "HOEGERUD"] <- "Högerud"
electiondata["kommun"][electiondata["kommun"] == "GLAVA"] <- "Glava" 
electiondata["kommun"][electiondata["kommun"] == "VAERMSKO"] <- "Värmskog"
electiondata["kommun"][electiondata["kommun"] == "SVANSKOG"] <- "Svanskog" 
electiondata["kommun"][electiondata["kommun"] == "MILLESVI"] <- "Millesvik"
electiondata["kommun"][electiondata["kommun"] == "ESKILSAE"] <- "Eskilsäter" 
electiondata["kommun"][electiondata["kommun"] == "OELSERUD"] <- "Ölserud"
electiondata["kommun"][electiondata["kommun"] == "BOTILSAE"] <- "Botilsäter" 
electiondata["kommun"][electiondata["V4"] == "1710050"] <- "By-Vermland"
electiondata["kommun"][electiondata["V4"] == "1710060"] <- "Bro-Vermland"
electiondata["kommun"][electiondata["kommun"] == "SOEDRANY"] <- "Södra Ny" 
electiondata["kommun"][electiondata["kommun"] == "SAEFFLEK"] <- "Säffle LF"
electiondata["kommun"][electiondata["kommun"] == "HUGGENAE"] <- "Huggenäs" 
electiondata["kommun"][electiondata["V4"] == "1710110"] <- "Kila-Vermland"
electiondata$kommun[electiondata$kommun == "TVETA" & electiondata$V4 == "1710120"] <- "Tveta-Vermland"
electiondata["kommun"][electiondata["kommun"] == "SILLERUD"] <- "Sillerud" 
electiondata["kommun"][electiondata["kommun"] == "HOLMEDAL"] <- "Holmedal" 
electiondata["kommun"][electiondata["kommun"] == "VFAAGELV"] <- "Vestra Fogelvik"
electiondata["kommun"][electiondata["kommun"] == "TOECKMA"] <- "Töcksmark" 
electiondata["kommun"][electiondata["kommun"] == "OESTERVA"] <- "Östervallskog"
electiondata["kommun"][electiondata["kommun"] == "KARLANDA"] <- "Karlanda" 
electiondata["kommun"][electiondata["kommun"] == "BLOMSKOG"] <- "Blomskog" 
electiondata["kommun"][electiondata["kommun"] == "TRANKIL"] <- "Trankil"
electiondata["kommun"][electiondata["kommun"] == "SILBODAL"] <- "Silbodal" 
electiondata["kommun"][electiondata["kommun"] == "SKILLING"] <- "Skillingemark"
electiondata["kommun"][electiondata["kommun"] == "JAERNSKO"] <- "Jernskog" 
electiondata["kommun"][electiondata["kommun"] == "KOELA"] <- "Köla" 
electiondata["kommun"][electiondata["kommun"] == "EDA"] <- "Eda"
electiondata["kommun"][electiondata["V4"] == "1712030"] <- "Arvika LF"
electiondata["kommun"][electiondata["kommun"] == "NY"] <- "Ny"
electiondata["kommun"][electiondata["kommun"] == "AELGAA"] <- "Elgå" 
electiondata["kommun"][electiondata["kommun"] == "GUNNARSK"] <- "Gunnarskog"
electiondata["kommun"][electiondata["kommun"] == "BOGEN"] <- "Bogen" 
electiondata["kommun"][electiondata["kommun"] == "BRUNSKOG"] <- "Brunskog"
electiondata["kommun"][electiondata["kommun"] == "MANGSKOG"] <- "Mangskog"
electiondata["kommun"][electiondata["V4"] == "1712120"] <- "Boda-Vermland"
electiondata["kommun"][electiondata["kommun"] == "NNY"] <- "Norra Ny" 
electiondata["kommun"][electiondata["kommun"] == "NYSKOGA"] <- "Nyskoga"
electiondata["kommun"][electiondata["V4"] == "1713030"] <- "Dalby-Elvdals"
electiondata["kommun"][electiondata["kommun"] == "SFINNSKO"] <- "Södra Finnskoga" 
electiondata["kommun"][electiondata["kommun"] == "NFINNSKO"] <- "Norra Finnskoga"
electiondata["kommun"][electiondata["kommun"] == "EKSHAERA"] <- "Ekshärad" 
electiondata["kommun"][electiondata["kommun"] == "NRAADA"] <- "Norra Råda"
electiondata["kommun"][electiondata["kommun"] == "SUNNEMO"] <- "Sunnemo" 
electiondata["kommun"][electiondata["V4"] == "1713110"] <- "Gustaf Adolf-Elvdals"
electiondata["kommun"][electiondata["V4"] == "1714010"] <- "Sunne-Vermland"
electiondata["kommun"][electiondata["kommun"] == "OEEMTERV"] <- "Östra Emtervik" 
electiondata["kommun"][electiondata["kommun"] == "VEMTERVI"] <- "Vestra Emtervik"
electiondata["kommun"][electiondata["kommun"] == "GRAESMAR"] <- "Gräsmark" 
electiondata["kommun"][electiondata["kommun"] == "LYSVIK"] <- "Lysvik" 
electiondata["kommun"][electiondata["kommun"] == "FRYKSAEN"] <- "Fryksände"
electiondata["kommun"][electiondata["kommun"] == "OESTMARK"] <- "Östmark" 
electiondata["kommun"][electiondata["kommun"] == "SUNNEK"] <- "SUNNEK"
electiondata["kommun"][electiondata["kommun"] == "LEKVATTN"] <- "Lekvattnet" 
electiondata["kommun"][electiondata["kommun"] == "VITSAND"] <- "Hvitsand" 


## ÖREBRO
electiondata["kommun"][electiondata["kommun"] == "MOSJOE"] <- "Mosjö"
electiondata["kommun"][electiondata["kommun"] == "TAEBY"] <- "Täby-Örebro"
electiondata["kommun"][electiondata["kommun"] == "VINTROSA"] <- "Vintrosa" 
electiondata["kommun"][electiondata["kommun"] == "TYSSLING"] <- "Tysslinge"
electiondata["kommun"][electiondata["kommun"] == "KIL"] <- "Kil" 
electiondata["kommun"][electiondata["kommun"] == "GRAEVE"] <- "Gräve" 
electiondata["kommun"][electiondata["kommun"] == "EKER"] <- "Eker"
electiondata["kommun"][electiondata["kommun"] == "LAENGBRO"] <- "Längbro" 
electiondata["kommun"][electiondata["kommun"] == "AANSTA"] <- "Ånsta" 
electiondata["kommun"][electiondata["kommun"] == "ALMBY"] <- "Almby"
electiondata["kommun"][electiondata["kommun"] == "AXBERG"] <- "Axberg" 
electiondata["kommun"][electiondata["kommun"] == "HOVSTA"] <- "Hovsta" 
electiondata["kommun"][electiondata["kommun"] == "GLANSHAM"] <- "Glanshammar"
electiondata$kommun[electiondata$V4 == "1802020"] <- "Rinkaby-Örebro"
electiondata["kommun"][electiondata["V4"] == "1802030"] <- "Götlunda-Örebro"
electiondata$kommun[electiondata$V4 == "1802040"] <- "Lillkyrka-Örebro"
electiondata["kommun"][electiondata["kommun"] == "OEDEBY"] <- "Ödeby" 
electiondata["kommun"][electiondata["kommun"] == "ASKER"] <- "Asker" 
electiondata["kommun"][electiondata["kommun"] == "LAENNAES"] <- "Lännäs"
electiondata$kommun[electiondata$V4 == "1803030"] <- "Stora Mellösa" 
electiondata["kommun"][electiondata["kommun"] == "NORRBYAA"] <- "Norrbyås" 
electiondata$kommun[electiondata$kommun == "EKEBY" & electiondata$V4 == "1804020"] <- "Ekeby-Örebro"
electiondata["kommun"][electiondata["kommun"] == "GAELLERS"] <- "Gellersta"
electiondata["kommun"][electiondata["kommun"] == "SVENNEVA"] <- "Svennevad" 
electiondata["kommun"][electiondata["V4"] == "1804050"] <- "Bo-Örebro"
electiondata["kommun"][electiondata["kommun"] == "SKOELLER"] <- "Sköllersta"
electiondata["kommun"][electiondata["kommun"] == "HALLSBER"] <- "Hallsberg LF" 
electiondata["kommun"][electiondata["V4"] == "1805020"] <- "Kumla-Örebro"
electiondata["kommun"][electiondata["kommun"] == "LERBAECK"] <- "Lerbäck" 
electiondata["kommun"][electiondata["kommun"] == "KUMLAL"] <- "Kumla-Örebro 2"
electiondata["kommun"][electiondata["kommun"] == "HARDEMO"] <- "Hardemo" 
electiondata["kommun"][electiondata["V4"] == "1806020"] <- "Kräklinge"
electiondata["kommun"][electiondata["kommun"] == "HACKVAD"] <- "Hackva" 
electiondata$kommun[electiondata$kommun == "VIBY" & electiondata$V4 == "1807020"] <- "Viby-Grimsten"
electiondata["kommun"][electiondata["kommun"] == "RAMUNDEB"] <- "Bodarne"
electiondata["kommun"][electiondata["kommun"] == "EDSBERG"] <- "Edsberg" 
electiondata["kommun"][electiondata["kommun"] == "KNISTA"] <- "Knista" 
electiondata["kommun"][electiondata["kommun"] == "HIDINGE"] <- "Hidinge"
electiondata["kommun"][electiondata["kommun"] == "KVISTBRO"] <- "Kvistbro" 
electiondata["kommun"][electiondata["kommun"] == "TAANGER"] <- "Tångeråsa" 
electiondata["kommun"][electiondata["kommun"] == "SKAGERSH"] <- "Skagershult"
electiondata$kommun[electiondata$V4 == "1808070"] <- "Nysund-Örebro"
electiondata["kommun"][electiondata["kommun"] == "ASKERSLK"] <- "Askersund LF" 
electiondata["kommun"][electiondata["kommun"] == "HAMMAR"] <- "Hammar"
electiondata["kommun"][electiondata["kommun"] == "SNAVLUND"] <- "Snaflunda" 
electiondata$kommun[electiondata$V4 == "1810010"] <- "Nora LF"
electiondata["kommun"][electiondata["kommun"] == "VIKER"] <- "Viker"
electiondata["kommun"][electiondata["kommun"] == "JAERNBO"] <- "Jernboås" 
electiondata["kommun"][electiondata["kommun"] == "HJULSJOE"] <- "Hjulsjö" 
electiondata["kommun"][electiondata["kommun"] == "KARLSKOG"] <- "Karlskoga"
electiondata["kommun"][electiondata["kommun"] == "BJURTJAE"] <- "Bjurtjärn" 
electiondata["kommun"][electiondata["kommun"] == "DEGERF"] <- "Degerfors-Örebro"
electiondata["kommun"][electiondata["kommun"] == "DEGK@P"] <- "DEGK@"
electiondata["kommun"][electiondata["kommun"] == "GRYTHYTT"] <- "Grythyttan" 
electiondata["kommun"][electiondata["kommun"] == "HAELLEFO"] <- "Hellefors" 
electiondata["kommun"][electiondata["kommun"] == "LINDESLK"] <- "Lindesberg LF"
electiondata["kommun"][electiondata["kommun"] == "RAMSBERG"] <- "Ramsberg" 
electiondata["kommun"][electiondata["kommun"] == "LJUSNARS"] <- "Ljusnarsberg" 
electiondata["kommun"][electiondata["kommun"] == "KOPPARKG"] <- "KOPPARKG"
electiondata["kommun"][electiondata["kommun"] == "FELLING"] <- "Fellingsbro" 
electiondata["kommun"][electiondata["V4"] == "1815020"] <- "Näsby-Örebro"
electiondata["kommun"][electiondata["kommun"] == "ERVALLA"] <- "Ervalla" 
electiondata["kommun"][electiondata["kommun"] == "AVESTA"] <- "Avesta" 
electiondata["kommun"][electiondata["kommun"] == "STKOPP"] <- "Falu LF" 



## VÄSTMANLAND
electiondata["kommun"][electiondata["kommun"] == "MUNKTORP"] <- "Munktorp" 
electiondata["kommun"][electiondata["kommun"] == "KOLBAECK"] <- "Kolbäck" 
electiondata["kommun"][electiondata["kommun"] == "SVEDVI"] <- "Svedvi"
electiondata$kommun[electiondata$kommun == "SAEBY" & electiondata$V4 == "1901040"] <- "Säby-Vmanland"
electiondata["kommun"][electiondata["V4"] == "1901050"] <- "Berg-Snevringe"
electiondata["kommun"][electiondata["kommun"] == "RYTTERNE"] <- "Rytterne" 
electiondata["kommun"][electiondata["kommun"] == "RAMNAES"] <- "Ramnäs"
electiondata["kommun"][electiondata["kommun"] == "SURA"] <- "Sura" 
electiondata["kommun"][electiondata["V4"] == "1902010"] <- "Vesterås-Barkarö"
electiondata["kommun"][electiondata["kommun"] == "DINGTUNA"] <- "Dingtuna" 
electiondata["kommun"][electiondata["V4"] == "1902030"] <- "Lillhärad"
electiondata["kommun"][electiondata["kommun"] == "BADELUND"] <- "Badelunda" 
electiondata["kommun"][electiondata["kommun"] == "HUBBO"] <- "Hubbo"
electiondata["kommun"][electiondata["kommun"] == "IRSTA"] <- "Irsta" 
electiondata["kommun"][electiondata["kommun"] == "KUNGSAAR"] <- "Kungsåra" 
electiondata["kommun"][electiondata["kommun"] == "KAERRBO"] <- "Kärrbo" 
electiondata["kommun"][electiondata["kommun"] == "TILLBERG"] <- "Tillberga"
electiondata["kommun"][electiondata["kommun"] == "BJOERKST"] <- "Björksta" 
electiondata["kommun"][electiondata["kommun"] == "TORTUNA"] <- "Tortuna"
electiondata["kommun"][electiondata["kommun"] == "SAVALLA"] <- "Sevalla" 
electiondata["kommun"][electiondata["kommun"] == "AENGSJOE"] <- "Ängsö"
electiondata["kommun"][electiondata["kommun"] == "SKINNSKA"] <- "Skinnskatteberg" 
electiondata["kommun"][electiondata["kommun"] == "GUNNILBO"] <- "Gunnilbo"
electiondata["kommun"][electiondata["kommun"] == "HED"] <- "Hed"
electiondata["kommun"][electiondata["kommun"] == "ARBOGALK"] <- "Arboga LF"
electiondata["kommun"][electiondata["kommun"] == "SAETERBO"] <- "Säterbo" 
electiondata["kommun"][electiondata["kommun"] == "KUNGSBAR"] <- "Kungs-Barkarö"
electiondata["kommun"][electiondata["kommun"] == "BJOERSKO"] <- "Björskog" 
electiondata["kommun"][electiondata["V4"] == "1906060"] <- "Bro-Vmanland"
electiondata["kommun"][electiondata["kommun"] == "KUNGKARL"] <- "Kung Karl"
electiondata["kommun"][electiondata["kommun"] == "KUNGSOEK"] <- "KUNGSOEK" 
electiondata$kommun[electiondata$kommun == "TORPA" & electiondata$V4 == "1906100"] <- "Torpa-Vmanland"
electiondata["kommun"][electiondata["kommun"] == "HIMMETA"] <- "Himmeta"
electiondata$kommun[electiondata$V4 == "1906120"] <- "Malma-Vmanland"
electiondata["kommun"][electiondata["kommun"] == "MEDAAKER"] <- "Medåker" 
electiondata["kommun"][electiondata["V4"] == "1906140"] <- "Odensvi-Vmanland"
electiondata["kommun"][electiondata["kommun"] == "VSKEDVI"] <- "Vestra Skedvi"
electiondata["kommun"][electiondata["kommun"] == "VAESTERF"] <- "Vester-Färnebo" 
electiondata["kommun"][electiondata["kommun"] == "NORBERG"] <- "Norberg"
electiondata["kommun"][electiondata["kommun"] == "VAESTANF"] <- "Vestanfors" 
electiondata["kommun"][electiondata["kommun"] == "KARBENNI"] <- "Karbenning"
electiondata["kommun"][electiondata["V4"] == "1908040"] <- "Vestervåla"
electiondata["kommun"][electiondata["kommun"] == "FLAECKEB"] <- "Fläckebo"
electiondata["kommun"][electiondata["kommun"] == "HARAKER"] <- "Haraker" 
electiondata["kommun"][electiondata["kommun"] == "ROMFARTU"] <- "Romfartuna" 
electiondata["kommun"][electiondata["kommun"] == "SKULTUNA"] <- "Skultuna"
electiondata["kommun"][electiondata["kommun"] == "SKERIKE"] <- "Skerike" 
electiondata["kommun"][electiondata["kommun"] == "TORSTUNA"] <- "Torstuna"
electiondata["kommun"][electiondata["kommun"] == "HAERNEVI"] <- "Hernevi" 
electiondata["kommun"][electiondata["kommun"] == "OESTERUN"] <- "Österunda"
electiondata["kommun"][electiondata["kommun"] == "VITTINGE"] <- "Vittinge" 
electiondata$kommun[electiondata$V4 == "1911010"] <- "Vester-Löfsta"
electiondata["kommun"][electiondata["kommun"] == "ENAAKER"] <- "Enåker"
electiondata["kommun"][electiondata["kommun"] == "NORRBY"] <- "Norrby" 
electiondata$kommun[electiondata$V4 == "1911040"] <- "Tärna-Simtuna"
electiondata["kommun"][electiondata["kommun"] == "SIMTUNA"] <- "Simtuna"
electiondata["kommun"][electiondata["kommun"] == "ALTUNA"] <- "Altuna" 
electiondata["kommun"][electiondata["kommun"] == "FROESTHU"] <- "Fröshult" 
electiondata$kommun[electiondata$V4 == "1912010"] <- "Kumla-Vmanland"
electiondata$kommun[electiondata$V4 == "1912020"] <- "Kila-Vmanland"
electiondata["kommun"][electiondata["kommun"] == "SALALK"] <- "Sala LF"
electiondata["kommun"][electiondata["kommun"] == "MOEKLINT"] <- "Möklinta" 
electiondata["kommun"][electiondata["kommun"] == "OESTERV"] <- "Öster-Våla"
electiondata$kommun[electiondata$V4 == "1913020"] <- "Nora-Vmanland"
electiondata["kommun"][electiondata["kommun"] == "HARBO"] <- "Harbo"
electiondata["kommun"][electiondata["kommun"] == "HUDDUNGE"] <- "Huddunge" 


## KOPPARBERG
electiondata["kommun"][electiondata["kommun"] == "ASPEBODA"] <- "Aspeboda"
electiondata["kommun"][electiondata["kommun"] == "SVAERDSJ"] <- "Svärdsjö"
electiondata["kommun"][electiondata["kommun"] == "ENVIKEN"] <- "Enviken"
electiondata["kommun"][electiondata["kommun"] == "SUNDBORN"] <- "Sundborn"
electiondata["kommun"][electiondata["kommun"] == "VIKA"] <- "Vika"
electiondata["kommun"][electiondata["kommun"] == "STKOPP"] <- "STKOPP"
electiondata["kommun"][electiondata["kommun"] == "TORSAANG"] <- "Torsång"
electiondata["kommun"][electiondata["kommun"] == "STORATUN"] <- "Stora Tuna"
electiondata["kommun"][electiondata["kommun"] == "SILVBERG"] <- "Silvberg"
electiondata["kommun"][electiondata["V4"] == "2002040"] <- "Gustaf-Kopparberg"
electiondata["kommun"][electiondata["kommun"] == "DOMNARV"] <- "DOMNARV"
electiondata["kommun"][electiondata["kommun"] == "BORL#N"] <- "BORL#N"
electiondata["kommun"][electiondata["kommun"] == "BORLAEKG"] <- "BORLAEKG"
electiondata["kommun"][electiondata["kommun"] == "SAETERSL"] <- "Säter LF"
electiondata["kommun"][electiondata["kommun"] == "STORASKE"] <- "Stora Skedvi"
electiondata["kommun"][electiondata["V4"] == "2003030"] <- "Husby-Kopparberg"
electiondata["kommun"][electiondata["kommun"] == "HEDEMOLK"] <-"Hedemora LF"
electiondata["kommun"][electiondata["kommun"] == "GARPENBE"] <- "Garpenberg"
electiondata["kommun"][electiondata["kommun"] == "GRYTNAES"] <- "Grytnäs"
electiondata["kommun"][electiondata["kommun"] == "FOLKAERN"] <- "Folkärna"
electiondata["kommun"][electiondata["V4"] == "2004030"] <- "By-Kopparberg"
electiondata["kommun"][electiondata["kommun"] == "LEKSAND"] <- "Leksand"
electiondata["kommun"][electiondata["kommun"] == "SILJANSN"] <- "Siljansnäs"
electiondata["kommun"][electiondata["kommun"] == "AAL"] <- "Ål"
electiondata["kommun"][electiondata["kommun"] == "BJURSAAS"] <- "Bjursås"
electiondata["kommun"][electiondata["kommun"] == "GAGNEF"] <- "Gagnef"
electiondata["kommun"][electiondata["kommun"] == "RAETTVIK"] <- "Rättvik"
electiondata["kommun"][electiondata["V4"] == "2007020"] <- "Boda-Kopparberg"
electiondata["kommun"][electiondata["kommun"] == "ORE"] <- "Ore"
electiondata["kommun"][electiondata["kommun"] == "MORA"] <- "Mora"
electiondata["kommun"][electiondata["kommun"] == "VAAMHUS"] <- "Våmhus"
electiondata["kommun"][electiondata["kommun"] == "SOLLEROE"] <- "Sollerön"
electiondata["kommun"][electiondata["kommun"] == "VENJAN"] <- "Venjan"
electiondata["kommun"][electiondata["kommun"] == "MORASTKG"] <- "MORASTKG"
electiondata["kommun"][electiondata["kommun"] == "ORSA"] <- "Orsa"
electiondata["kommun"][electiondata["kommun"] == "AELFDALE"] <- "Älvdalen"
electiondata["kommun"][electiondata["kommun"] == "SAERNA"] <- "Särna"
electiondata["kommun"][electiondata["kommun"] == "IDRE"] <- "Idre"
electiondata["kommun"][electiondata["kommun"] == "NAAS"] <- "Nås"
electiondata["kommun"][electiondata["kommun"] == "JAERNA"] <- "Järna"
electiondata["kommun"][electiondata["kommun"] == "SAEFSNAE"] <- "Säfsnäs"
electiondata["kommun"][electiondata["V4"] == "2012040"] <- "Floda-Kopparberg"
electiondata["kommun"][electiondata["kommun"] == "MALUNG"] <- "Malung"
electiondata["kommun"][electiondata["kommun"] == "LIMA"] <- "Lima"
electiondata["kommun"][electiondata["kommun"] == "TRANSTRA"] <- "Transtrand"
electiondata["kommun"][electiondata["kommun"] == "AEPPELBO"] <- "Äppelbo"
electiondata["kommun"][electiondata["kommun"] == "GRANGAER"] <- "Grangärde"
electiondata["kommun"][electiondata["kommun"] == "NORRBAER"] <- "Norrbärke"
electiondata["kommun"][electiondata["kommun"] == "SOEDERB"] <- "Söderbärke"
electiondata["kommun"][electiondata["kommun"] == "MALINGSB"] <- "Malingsbo"
electiondata["kommun"][electiondata["kommun"] == "LUDVIKA"] <- "Ludvika"
electiondata["kommun"][electiondata["kommun"] == "SMEDKG"] <- "SMEDKG"


## GÄSTRIKLAND
electiondata["kommun"][electiondata["kommun"] == "HEDESUND"] <- "Hedesunda"
electiondata["kommun"][electiondata["kommun"] == "AARSUNDA"] <- "Årsunda"
electiondata["kommun"][electiondata["kommun"] == "HOEGBO"] <- "Högbo"
electiondata["kommun"][electiondata["kommun"] == "VALBO"] <- "Valbo"
electiondata["kommun"][electiondata["kommun"] == "HILLE"] <- "Hille"
electiondata["kommun"][electiondata["kommun"] == "HAMRAANG"] <- "Hamrånge"
electiondata["kommun"][electiondata["kommun"] == "SANDVKG"] <- "SANDVKG"
electiondata["kommun"][electiondata["kommun"] == "OCKELBO"] <- "Ockelbo"
electiondata["kommun"][electiondata["V4"] == "2102020"] <- "Järbo-Gävleborg"
electiondata["kommun"][electiondata["kommun"] == "OVANSJOE"] <- "Ovansjö"
electiondata$kommun[electiondata$kommun == "TORSAAKE" & electiondata$V4 == "2102040"] <- "Torsåker-Gävleborg"
electiondata["kommun"][electiondata["kommun"] == "OESTERF"] <- "Öster-Färnebo"
electiondata["kommun"][electiondata["kommun"] == "HOFORS"] <- "Hofors"
electiondata["kommun"][electiondata["kommun"] == "ALFTA"] <- "Alfta"
electiondata["kommun"][electiondata["kommun"] == "OVANAAKE"] <- "Ovanåker"
electiondata["kommun"][electiondata["kommun"] == "VOXNA"] <- "Voxna"
electiondata["kommun"][electiondata["kommun"] == "BOLLNAES"] <- "Bollnäs"
electiondata["kommun"][electiondata["V4"] == "2103050"] <- "Segersta"
electiondata["kommun"][electiondata["kommun"] == "HANEBO"] <- "Hanebo"
electiondata["kommun"][electiondata["kommun"] == "BJ@RKKG"] <- "BJ@RKKG"
electiondata["kommun"][electiondata["V4"] == "2104010"] <- "Skog-Gävleborg"
electiondata["kommun"][electiondata["kommun"] == "SOEDERAL"] <- "Söderala"
electiondata["kommun"][electiondata["V4"] == "2104030"] <- "Mo-Gävleborg"
electiondata["kommun"][electiondata["kommun"] == "RENGSJOE"] <- "Rengsjö"
electiondata["kommun"][electiondata["kommun"] == "NORRALA"] <- "Norrala"
electiondata["kommun"][electiondata["kommun"] == "TROENOE"] <- "Trönö"
electiondata["kommun"][electiondata["kommun"] == "ENAANGER"] <- "Enånger"
electiondata["kommun"][electiondata["kommun"] == "NJUTAANG"] <- "Njutånger"
electiondata["kommun"][electiondata["kommun"] == "NIANFORS"] <- "Nianfors"
electiondata["kommun"][electiondata["kommun"] == "HARMAANG"] <- "Harmånger"
electiondata["kommun"][electiondata["kommun"] == "JAETTEND"] <- "Jättendal"
electiondata["kommun"][electiondata["kommun"] == "GNARP"] <- "Gnarp"
electiondata["kommun"][electiondata["kommun"] == "BERGSJOE"] <- "Bergsjö"
electiondata["kommun"][electiondata["kommun"] == "HASSELA"] <- "Hassela"
electiondata$kommun[electiondata$kommun == "HAELSING" & electiondata$V4 == "2106060"] <- "Hälsingtuna"
electiondata["kommun"][electiondata["kommun"] == "IDENOR"] <- "Idenor"
electiondata["kommun"][electiondata["V4"] == "2106100"] <- "Forsa-Gävleborg"
electiondata$kommun[electiondata$kommun == "HOEG" & electiondata$V4 == "2106110"] <- "Hög-Gävleborg"
electiondata["kommun"][electiondata["kommun"] == "ROGSTA"] <- "Rogsta"
electiondata["kommun"][electiondata["kommun"] == "ILSBO"] <- "Ilsbo"
electiondata["kommun"][electiondata["kommun"] == "NORRBO"] <- "Norrbo"
electiondata["kommun"][electiondata["kommun"] == "BJURAAKE"] <- "Bjuråker"
electiondata["kommun"][electiondata["kommun"] == "DELSBO"] <- "Delsbo"
electiondata["kommun"][electiondata["kommun"] == "LJUSDAL"] <- "Ljusdal"
electiondata["kommun"][electiondata["kommun"] == "RAMSJOE"] <- "Ramsjö"
electiondata["kommun"][electiondata["kommun"] == "FAERILA"] <- "Färila"
electiondata["kommun"][electiondata["kommun"] == "LOS"] <- "Los"
electiondata["kommun"][electiondata["kommun"] == "F#RK$R"] <- "F#RK$R"
electiondata["kommun"][electiondata["kommun"] == "ARBRAA"] <- "Arbrå"
electiondata["kommun"][electiondata["kommun"] == "UNDERSVI"] <- "Undersvik"
electiondata["kommun"][electiondata["kommun"] == "GAEVLE"] <- "GAEVLE"
electiondata["kommun"][electiondata["kommun"] == "LJUSDAKG"] <- "LJUSDAKG"
electiondata["kommun"][electiondata["kommun"] == "JAERVSOE"] <- "Järvsö"



## VÄSTERNORRLAND
electiondata["kommun"][electiondata["kommun"] == "SELAANGE"] <- "Selånger"
electiondata["kommun"][electiondata["kommun"] == "SAETTNA"] <- "Sättna"
electiondata$kommun[electiondata$kommun == "TUNA" & electiondata$V4 == "2201030"] <- "Tuna-Vnorrland"
electiondata["kommun"][electiondata["kommun"] == "ATTMAR"] <- "Attmar"
electiondata["kommun"][electiondata["kommun"] == "STOEDE"] <- "Stöde"
electiondata$kommun[electiondata$kommun == "TORP" & electiondata$V4 == "2201060"] <- "Torp-Vnorrland"
electiondata["kommun"][electiondata["kommun"] == "BORGSJOE"] <- "Borgsjö"
electiondata["kommun"][electiondata["kommun"] == "HAVEROE"] <- "Haverö"
electiondata["kommun"][electiondata["kommun"] == "NJURUNDA"] <- "Njurunda"
electiondata["kommun"][electiondata["kommun"] == "SKOEN"] <- "Skön"
electiondata["kommun"][electiondata["kommun"] == "ALNOE"] <- "Alnö"
electiondata["kommun"][electiondata["kommun"] == "TIMRAA"] <- "Timrå"
electiondata["kommun"][electiondata["kommun"] == "INDAL"] <- "Indal"
electiondata["kommun"][electiondata["kommun"] == "INDALSLI"] <- "Indals-Liden"
electiondata["kommun"][electiondata["V4"] == "2202070"] <- "Holm-Vnorrland"
electiondata["kommun"][electiondata["kommun"] == "LJUSTORP"] <- "Ljustorp"
electiondata["kommun"][electiondata["kommun"] == "HAESSJOE"] <- "Hässjö"
electiondata["kommun"][electiondata["kommun"] == "TYNDEROE"] <- "Tynderö"
electiondata["kommun"][electiondata["kommun"] == "SAEBRAA"] <- "Säbrå"
electiondata["kommun"][electiondata["kommun"] == "STIGSJOE"] <- "Stigsjö"
electiondata["kommun"][electiondata["kommun"] == "VIKSJOE"] <- "Viksjö"
electiondata["kommun"][electiondata["kommun"] == "HAEGGDAA"] <- "Häggdånger"
electiondata["kommun"][electiondata["kommun"] == "GUDMUNDR"] <- "Gudmundrå"
electiondata["kommun"][electiondata["kommun"] == "HOEGSJOE"] <- "Högsjö"
electiondata["kommun"][electiondata["kommun"] == "HEMSOE"] <- "Hemsö"
electiondata["kommun"][electiondata["V4"] == "2208100"] <- "Nora-Vnorrland"
electiondata["kommun"][electiondata["kommun"] == "BJAERTR"] <- "Bjertrå"
electiondata["kommun"][electiondata["V4"] == "2208120"] <- "Skog-Vnorrland"
electiondata["kommun"][electiondata["kommun"] == "NORDINGR"] <- "Nordingrå"
electiondata["kommun"][electiondata["kommun"] == "ULLAANGE"] <- "Ullånger"
electiondata["kommun"][electiondata["kommun"] == "VIBYGGER"] <- "Vibyggerå"
electiondata$kommun[electiondata$kommun == "TORSAAKE" & electiondata$V4 == "2209010"] <- "Torsåker-Vnorrland"
electiondata["kommun"][electiondata["kommun"] == "YTTERLAE"] <- "Ytter-Lännäs"
electiondata["kommun"][electiondata["kommun"] == "DAL"] <- "Dal"
electiondata["kommun"][electiondata["kommun"] == "BOTEAA"] <- "Boteå"
electiondata["kommun"][electiondata["kommun"] == "STYRNAES"] <- "Styrnäs"
electiondata["kommun"][electiondata["kommun"] == "OEVERLAE"] <- "Över-Lännäs"
electiondata["kommun"][electiondata["V4"] == "2209070"] <- "Sånga-Vnorrland"
electiondata["kommun"][electiondata["kommun"] == "MULTRAA"] <- "Multrå"
electiondata["kommun"][electiondata["V4"] == "2210030"] <- "Ed-Vnorrland"
electiondata["kommun"][electiondata["kommun"] == "LAANGSEL"] <- "Långsele"
electiondata["kommun"][electiondata["kommun"] == "GRANINGE"] <- "Graninge"
electiondata["kommun"][electiondata["kommun"] == "SOLLEFTE"] <- "Sollefteå"
electiondata["kommun"][electiondata["kommun"] == "RESELE"] <- "Resele"
electiondata["kommun"][electiondata["kommun"] == "AADALSLI"] <- "Ådals-Liden"
electiondata["kommun"][electiondata["kommun"] == "HELGUM"] <- "Helgum"
electiondata["kommun"][electiondata["kommun"] == "RAMSELE"] <- "Ramsele"
electiondata["kommun"][electiondata["kommun"] == "EDSELE"] <- "Edsele"
electiondata["kommun"][electiondata["kommun"] == "JUNSELE"] <- "Junsele"
electiondata["kommun"][electiondata["kommun"] == "FJAELLSJ"] <- "Fjällsjö"
electiondata["kommun"][electiondata["kommun"] == "BODUM"] <- "Bodum"
electiondata["kommun"][electiondata["kommun"] == "TAASJOE"] <- "Tåsjö"
electiondata["kommun"][electiondata["kommun"] == "NAETRA"] <- "Nätra"
electiondata["kommun"][electiondata["kommun"] == "SIDENSJ"] <- "Sidensjö"
electiondata["kommun"][electiondata["kommun"] == "SKORPED"] <- "Skorped"
electiondata["kommun"][electiondata["kommun"] == "ANUNDSJ"] <- "Anundsjö"
electiondata["kommun"][electiondata["kommun"] == "SJAELEVA"] <- "Själevad"
electiondata["kommun"][electiondata["V4"] == "2213060"] <- "Mo-Vnorrland"
electiondata["kommun"][electiondata["kommun"] == "BJOERNA"] <- "Björna"
electiondata["kommun"][electiondata["kommun"] == "ARNAES"] <- "Arnäs"
electiondata["kommun"][electiondata["kommun"] == "GIDEAA"] <- "Gideå"
electiondata["kommun"][electiondata["V4"] == "2213120"] <- "Trehörningsjö"
electiondata["kommun"][electiondata["V4"] == "2213130"] <- "Grundsunda"


## JÄMTLAND
electiondata["kommun"][electiondata["kommun"] == "RAGUNDA"] <- "Ragunda"
electiondata["kommun"][electiondata["V4"] == "2301020"] <- "Fors-Ragunda"
electiondata["kommun"][electiondata["kommun"] == "HAELLESJ"] <- "Hellesjö"
electiondata["kommun"][electiondata["kommun"] == "HAASJOE"] <- "Håsjö"
electiondata["kommun"][electiondata["kommun"] == "STUGUN"] <- "Stugun"
electiondata["kommun"][electiondata["kommun"] == "BORGVATT"] <- "Borgvattnet"
electiondata["kommun"][electiondata["kommun"] == "REVSUND"] <- "Revsund"
electiondata["kommun"][electiondata["kommun"] == "SUNDSJOE"] <- "Sundsjö"
electiondata["kommun"][electiondata["kommun"] == "BRAECKE"] <- "Bräcke"
electiondata["kommun"][electiondata["kommun"] == "BODSJOE"] <- "Bodsjö"
electiondata["kommun"][electiondata["kommun"] == "NYHEM"] <- "Nyhem"
electiondata["kommun"][electiondata["kommun"] == "BRUNFLO"] <- "Brunflo"
electiondata["kommun"][electiondata["kommun"] == "MARIEBY"] <- "Marieby"
electiondata["kommun"][electiondata["kommun"] == "LOCKNE"] <- "Lockne"
electiondata["kommun"][electiondata["kommun"] == "HACKAAS"] <- "Hackås"
electiondata["kommun"][electiondata["V4"] == "2302120"] <- "Näs-Jemtland"
electiondata["kommun"][electiondata["kommun"] == "LIT"] <- "Lit"
electiondata["kommun"][electiondata["V4"] == "2303020"] <- "Kyrkås-Jemtland"
electiondata["kommun"][electiondata["kommun"] == "HAEGGEN"] <- "Häggenås"
electiondata["kommun"][electiondata["kommun"] == "FOELLING"] <- "Föllinge"
electiondata["kommun"][electiondata["kommun"] == "LAXSJOE"] <- "Laxsjö"
electiondata["kommun"][electiondata["kommun"] == "HOTAGEN"] <- "Hotagen"
electiondata["kommun"][electiondata["kommun"] == "ROEDOEN"] <- "Rödön"
electiondata["kommun"][electiondata["kommun"] == "NAESKOTT"] <- "Näskott"
electiondata["kommun"][electiondata["kommun"] == "ASPAAS"] <- "Aspås"
electiondata$kommun[electiondata$kommun == "AAS" & electiondata$V4 == "2303120"] <- "Ås-Jemtland"
electiondata["kommun"][electiondata["kommun"] == "HAMMERDA"] <- "Hammerdal"
electiondata["kommun"][electiondata["kommun"] == "GAAXSJOE"] <- "Gåxsjö"
electiondata["kommun"][electiondata["kommun"] == "STROEM"] <- "Ström"
electiondata["kommun"][electiondata["kommun"] == "ALANAES"] <- "Alanäs"
electiondata["kommun"][electiondata["kommun"] == "FROSTVIK"] <- "Frostviken"
electiondata["kommun"][electiondata["kommun"] == "MATTMAR"] <- "Mattmar"
electiondata["kommun"][electiondata["kommun"] == "SVEG"] <- "Sveg"
electiondata["kommun"][electiondata["kommun"] == "LINSAELL"] <- "Linsell"
electiondata["kommun"][electiondata["kommun"] == "AELVROS"] <- "Elvros"
electiondata["kommun"][electiondata["V4"] == "2311040"] <- "Lillherdal"
electiondata["kommun"][electiondata["kommun"] == "YTTERHOG"] <- "Ytter-Hogdal"
electiondata["kommun"][electiondata["kommun"] == "OEVERHOG"] <- "Över-Hogdal"
electiondata["kommun"][electiondata["kommun"] == "#NGERS"] <- "#NGERS"
electiondata["kommun"][electiondata["kommun"] == "SVEGKG"] <- "SVEGKG"
electiondata["kommun"][electiondata["V4"] == "2312010"] <- "Hede-Jemtland"
electiondata["kommun"][electiondata["kommun"] == "STORSJOE"] <- "Storsjö"
electiondata["kommun"][electiondata["kommun"] == "VEMDALEN"] <- "Vemdalen"
electiondata["kommun"][electiondata["kommun"] == "TAENNAES"] <- "Tännäs"
electiondata["kommun"][electiondata["V4"] == "2313010"] <- "Berg-Jemtland"
electiondata["kommun"][electiondata["kommun"] == "AASARNE"] <- "Åsarne"
electiondata["kommun"][electiondata["kommun"] == "RAETAN"] <- "Rätan"
electiondata["kommun"][electiondata["kommun"] == "KLOEVSJ"] <- "Klövsjö"
electiondata["kommun"][electiondata["kommun"] == "OESTERSU"] <- "Östersund"
electiondata["kommun"][electiondata["V4"] == "2315010"] <- "Sunne-Jemtland"
electiondata["kommun"][electiondata["kommun"] == "FROESOEN"] <- "Frösön"
electiondata["kommun"][electiondata["kommun"] == "OVIKEN"] <- "Oviken"
electiondata["kommun"][electiondata["kommun"] == "MYSSJOE"] <- "Myssjö"
electiondata["kommun"][electiondata["kommun"] == "HALLEN"] <- "Hallen"
electiondata["kommun"][electiondata["kommun"] == "NORDEROE"] <- "Norderön"
electiondata["kommun"][electiondata["kommun"] == "MARBY"] <- "Marby"
electiondata["kommun"][electiondata["kommun"] == "UNDERSAA"] <- "Undersåker"
electiondata["kommun"][electiondata["kommun"] == "MOERSIL"] <- "Mörsill"
electiondata["kommun"][electiondata["kommun"] == "AARE"] <- "Åre"
electiondata["kommun"][electiondata["kommun"] == "KALL"] <- "Kall"
electiondata["kommun"][electiondata["kommun"] == "OFFERDAL"] <- "Offerdal"
electiondata["kommun"][electiondata["kommun"] == "ALSEN"] <- "Alsen"


## VÄSTERBOTTEN
electiondata["kommun"][electiondata["kommun"] == "NORDMALI"] <- "Nordmaling"
electiondata["kommun"][electiondata["kommun"] == "BJURHOLM"] <- "Bjurholm"
electiondata["kommun"][electiondata["kommun"] == "HOERNEFO"] <- "Hörnefors"
electiondata["kommun"][electiondata["kommun"] == "UMEAALK"] <- "Umeå LF"
electiondata["kommun"][electiondata["kommun"] == "VAENNAES"] <- "Vännäs"
electiondata["kommun"][electiondata["kommun"] == "SAEVAR"] <- "Säfvar"
electiondata["kommun"][electiondata["kommun"] == "HOLMOE"] <- "Holmö"
electiondata["kommun"][electiondata["kommun"] == "HOLMSUND"] <- "Holmsund"
electiondata["kommun"][electiondata["kommun"] == "V#NN#S"] <- "V#NN#S"
electiondata["kommun"][electiondata["kommun"] == "DEGERFOR"] <- "Degerfors-Vbotten"
electiondata["kommun"][electiondata["kommun"] == "BYGDEAA"] <- "Bygdeå"
electiondata["kommun"][electiondata["V4"] == "2404020"] <- "Nysätra-Vbotten"
electiondata["kommun"][electiondata["kommun"] == "LOEVAANG"] <- "Löfånger"
electiondata["kommun"][electiondata["kommun"] == "BURTRAES"] <- "Burträsk"
electiondata["kommun"][electiondata["kommun"] == "SKELLELK"] <- "Skellefteå LF"
electiondata["kommun"][electiondata["kommun"] == "BYSKE"] <- "Byske"
electiondata["kommun"][electiondata["kommun"] == "JOERN"] <- "Jörn"
electiondata["kommun"][electiondata["kommun"] == "BUREAA"] <- "Bureå"
electiondata["kommun"][electiondata["kommun"] == "MALAA"] <- "Malå"
electiondata["kommun"][electiondata["kommun"] == "NORSJOE"] <- "Norsjö"
electiondata["kommun"][electiondata["kommun"] == "LYCKSELE"] <- "Lycksele"
electiondata["kommun"][electiondata["kommun"] == "OERTRAES"] <- "Örträsk"
electiondata["kommun"][electiondata["kommun"] == "STENSELE"] <- "Stensele"
electiondata["kommun"][electiondata["V4"] == "2408040"] <- "Tärna-Vbotten"
electiondata["kommun"][electiondata["kommun"] == "SORSELE"] <- "Sorsele"
electiondata["kommun"][electiondata["kommun"] == "AASELE"] <- "Åsele"
electiondata["kommun"][electiondata["kommun"] == "FREDRIKA"] <- "Fredrika"
electiondata["kommun"][electiondata["kommun"] == "VILHELMI"] <- "Vilhelmina"
electiondata["kommun"][electiondata["kommun"] == "DOROTEA"] <- "Dorotea"  


## NORRBOTTEN
electiondata["kommun"][electiondata["kommun"] == "PITEAALK"] <- "Piteå LF"
electiondata["kommun"][electiondata["kommun"] == "AELVSBY"] <- "Elfsby"
electiondata["kommun"][electiondata["kommun"] == "ARVIDSJA"] <- "Arvidsjaur"
electiondata["kommun"][electiondata["kommun"] == "ARJEPLOG"] <- "Arjeplog"
electiondata["kommun"][electiondata["kommun"] == "NEDERLUL"] <- "Neder-Luleå"
electiondata["kommun"][electiondata["kommun"] == "OEVERLUL"] <- "Över-Luleå"
electiondata["kommun"][electiondata["kommun"] == "EDEFORS"] <- "Edefors"
electiondata["kommun"][electiondata["kommun"] == "JOKKMOKK"] <- "Jokkmokk"
electiondata["kommun"][electiondata["kommun"] == "RAANEAA"] <- "Råneå"
electiondata["kommun"][electiondata["kommun"] == "NEDERKAL"] <- "Neder-Kalix"
electiondata["kommun"][electiondata["kommun"] == "TOERE"] <- "TOERE"
electiondata["kommun"][electiondata["kommun"] == "OAVERKAL"] <- "Över-Kalix"
electiondata["kommun"][electiondata["kommun"] == "GAELLIVA"] <- "Gällivare"
electiondata["kommun"][electiondata["kommun"] == "NEDERTOR"] <- "Neder-Torneå"
electiondata["kommun"][electiondata["V4"] == "2512020"] <- "Karl Gustav-Norrbotten"
electiondata["kommun"][electiondata["kommun"] == "OEVERTOR"] <- "Över-Torneå"
electiondata["kommun"][electiondata["kommun"] == "HIETANIE"] <- "Hietaniemi"
electiondata["kommun"][electiondata["kommun"] == "KORPILOM"] <- "Korpilombolo"
electiondata["kommun"][electiondata["kommun"] == "PAJALA"] <- "Pajala"
electiondata["kommun"][electiondata["kommun"] == "TAEREND"] <- "Tärendö"
electiondata["kommun"][electiondata["kommun"] == "JUKKAS"] <- "Jukkasjärvi"
electiondata["kommun"][electiondata["kommun"] == "KARESUAN"] <- "Karesuando"



## now all the municipalities that we will link with the Bengtsson-Kersting dataset have the right names 
## ("kommun" variable)
##


## As discussed in the paper's Appendix B, there are some inconsistent reporting in the elections data set
## we straighten out these inconsistencies
library(dplyr)

fullelectionvariables <- paste0("V", 10:161)

## first, a few municipalities change name over time and are therefore recorded as two separate municipalities in the SND dataset, even though it's the same municipality.

## Gustaf and Börringe in Skåne. v10 to v100 is Gustaf, anything above 100 (the election of 1932) is Börringe
electiondata$kommun <- as.factor(electiondata$kommun)

gustafvariables <- paste0("V", 10:100)
gustaf_values <- electiondata %>%
  filter(kommun == "Gustaf-Vemmenhög") %>%
  select(all_of(gustafvariables)) %>%
  as.numeric()
# Byt ut värdena för observationen 'Börringe' med värdena från 'Gustaf'
electiondata <- electiondata %>%
  mutate(across(all_of(gustafvariables), ~ if_else(kommun == "Börringe", gustaf_values[match(cur_column(), 
  gustafvariables)], .)))
electiondata <- filter(electiondata, kommun != "Gustaf-Vemmenhög")

## Othem in 1936 changed name to Slite
slitevariables <- paste0("V", 10:161)
slite_values <- electiondata %>%
  filter(kommun == "SLITE") %>%
  select(all_of(slitevariables)) %>%
  as.list()
# addera värdena från Slite till Othem
electiondata <- electiondata %>%
  mutate(across(all_of(slitevariables), ~ if_else(kommun == "Othem", . + slite_values[[cur_column()]], .)))
electiondata <- filter(electiondata, kommun != "SLITE")

## Färila municipality in Gävleborg County was slightly revised in 1923, and Berglund codes this as two different municipalities. We merge them.
farilavariables <- paste0("V", 72:161)
farila_values <- electiondata %>%
  filter(kommun == "F#RK$R") %>%
  select(all_of(farilavariables)) %>%
  as.list()
# we take the values from the post-1923 version and paste them back to the pre-1923 municipality
electiondata <- electiondata %>%
  mutate(across(all_of(farilavariables), ~ if_else(kommun == "Färila", farila_values[[cur_column()]], .)))
electiondata <- filter(electiondata, kommun != "F#RK$R")

## Hasslö parish in Blekinge exists in one form for the 1911 to 1924 elections but another from 1928 onwards
hasslö2_values <- electiondata %>%
  filter(kommun == "Hasslö v2") %>%
  select(all_of(fullelectionvariables)) %>%
  as.list()
electiondata <- electiondata %>%
  mutate(across(all_of(fullelectionvariables), ~ if_else(kommun == "Hasslö", . + hasslö2_values[[cur_column()]], .)))
electiondata <- filter(electiondata, kommun != "Hasslö v2")


## a related adjustment is that for municipalities that change slightly. we add back to the votes of breakout (non-urban -- those that are urban are dropped) municipalities to the base
## municipality

## Kumla landskommun in Örebro county was reshaped in 1942 when Kumla city was separated from the LK and made into a municipality of its own
kumlavariables <- paste0("V", 148:161)
kumla_values <- electiondata %>%
  filter(kommun == "Kumla-Örebro 2") %>%
  select(all_of(kumlavariables)) %>%
  as.list()
electiondata <- electiondata %>%
  mutate(across(all_of(kumlavariables), ~ if_else(kommun == "Kumla-Örebro", . + kumla_values[[cur_column()]], .)))
electiondata <- filter(electiondata, kommun != "Kumla-Örebro 2")

## Norrfjärden was created in 1916 out of Piteå LF. We add back the Norrfjärden votes
## for some reason the election data has data for Norrfjärden already in 1911, even though the municipality only existed from 1916.
norrfjärdvariables <- paste0("V", 34:161)
norrfjärd_values <- electiondata %>%
  filter(kommun == "NORRFJAE") %>%
  select(all_of(norrfjärdvariables)) %>%
  as.list()
# addera värdena från Norrfjärden till Piteå LF
electiondata <- electiondata %>%
  mutate(across(all_of(norrfjärdvariables), ~ if_else(kommun == "Piteå LF", . + norrfjärd_values[[cur_column()]], .)))
electiondata <- filter(electiondata, kommun != "NORRFJAE")

## Hortlax was created in 1918 out of Piteå LF. We add back the Hortlax votes
hortlaxvariables <- paste0("V", 34:161)
hortlax_values <- electiondata %>%
  filter(kommun == "HORTLAX") %>%
  select(all_of(hortlaxvariables)) %>%
  as.list()
# addera värdena från Hortlax till Piteå LF
electiondata <- electiondata %>%
  mutate(across(all_of(hortlaxvariables), ~ if_else(kommun == "Piteå LF", . + hortlax_values[[cur_column()]], .)))
electiondata <- filter(electiondata, kommun != "HORTLAX")

## Junosuoando was created in 1914 out of Pajala. We add back the votes
junosuandovariables <- paste0("V", 10:161)
junosuando_values <- electiondata %>%
  filter(kommun == "JUNOSUAN") %>%
  select(all_of(junosuandovariables)) %>%
  as.list()
# addera värdena från Hortlax till Piteå LF
electiondata <- electiondata %>%
  mutate(across(all_of(junosuandovariables), ~ if_else(kommun == "Pajala", . + junosuando_values[[cur_column()]], .)))
electiondata <- filter(electiondata, kommun != "JUNOSUAN")

## Töre was created in 1925 out of Nederkalix. We add back the votes
torevariables <- paste0("V", 10:161)
tore_values <- electiondata %>%
  filter(kommun == "TOERE") %>%
  select(all_of(torevariables)) %>%
  as.list()
# addera värdena från Töre till Nederkalix
electiondata <- electiondata %>%
  mutate(across(all_of(torevariables), ~ if_else(kommun == "Neder-Kalix", . + tore_values[[cur_column()]], .)))
electiondata <- filter(electiondata, kommun != "TOERE")


## Hofors was created in 1925 out of Torsåker. We add back the votes
hoforsvariables <- paste0("V", 87:161)
hofors_values <- electiondata %>%
  filter(kommun == "Hofors") %>%
  select(all_of(hoforsvariables)) %>%
  as.list()
# addera värdena från Hofors till Torsåker
electiondata <- electiondata %>%
  mutate(across(all_of(hoforsvariables), ~ if_else(kommun == "Torsåker", . + hofors_values[[cur_column()]], .)))
electiondata <- filter(electiondata, kommun != "Hofors")

## also: Björkö-Arholma is in our data a part of Vätö. Created in 1914, first appears in SND with the 1917 election
björköarholma_values <- electiondata %>%
  filter(kommun == "Björkö-Arholma") %>%
  select(all_of(fullelectionvariables)) %>%
  as.list()
electiondata <- electiondata %>%
  mutate(across(all_of(fullelectionvariables), ~ if_else(kommun == "Vätö", . + björköarholma_values[[cur_column()]], .)))
electiondata <- filter(electiondata, kommun != "Björkö-Arholma")

## Smögen rural municipality was created in 1924 out of Kungshamn municip. We add back the Smögen votes
smögen_values <- electiondata %>%
  filter(kommun == "SM@GEN") %>%
  select(all_of(fullelectionvariables)) %>%
  as.list()
electiondata <- electiondata %>%
  mutate(across(all_of(fullelectionvariables), ~ if_else(kommun == "Kungshamn", . + smögen_values[[cur_column()]], .)))
electiondata <- filter(electiondata, kommun != "SM@GEN")


## a third type of adjustment is when a municipality is recorded twice in the SND data because it straddles a district or a county border
## STEHAG EXISTS IN TWO VERSIONS IN THE SND DATA, ONE ON EACH SIDE OF A HUNDRED BORDER

stehag2_values <- electiondata %>%
  filter(kommun == "Stehag-2") %>%
  select(all_of(fullelectionvariables)) %>%
  as.list()
electiondata <- electiondata %>%
  mutate(across(all_of(fullelectionvariables), ~ if_else(kommun == "Stehag", . + stehag2_values[[cur_column()]], .)))
electiondata <- filter(electiondata, kommun != "Stehag-2")

## Kvistofta was in 1911-17 in Luggude district, then in Rönnebergs district. I fusion the two.
kvistofta2_values <- electiondata %>%
  filter(kommun == "Kvistofta-Rönnebergs") %>%
  select(all_of(fullelectionvariables)) %>%
  as.list()
electiondata <- electiondata %>%
  mutate(across(all_of(fullelectionvariables), ~ if_else(kommun == "Kvistofta", . + kvistofta2_values[[cur_column()]], .)))
electiondata <- filter(electiondata, kommun != "Kvistofta-Rönnebergs")

## Norrvidinge in 1911-1937 had parts both in Onsjö (main part) and Harjager district. We add the Harjager figures to the main part and then remove the Harjager observation
norrvidinge2_values <- electiondata %>%
  filter(kommun == "Norrvidinge-Harjagers") %>%
  select(all_of(fullelectionvariables)) %>%
  as.list()
electiondata <- electiondata %>%
  mutate(across(all_of(fullelectionvariables), ~ if_else(kommun == "Norrvidinge", . + norrvidinge2_values[[cur_column()]], .)))
electiondata <- filter(electiondata, kommun != "Norrvidinge-Harjagers")

## Skatelöv had parts both in Allbo and Kinnevalds districts. we fusion them and remove the smaller original observation
skatelöv2_values <- electiondata %>%
  filter(kommun == "Skatelöv-Kinnevalds") %>%
  select(all_of(fullelectionvariables)) %>%
  as.list()
electiondata <- electiondata %>%
  mutate(across(all_of(fullelectionvariables), ~ if_else(kommun == "Skatelöv", . + skatelöv2_values[[cur_column()]], .)))
electiondata <- filter(electiondata, kommun != "Skatelöv-Kinnevalds")

## the double reporting of Bitterna (split into a west and an east part)
bitterna_values <- electiondata %>%
  filter(kommun == "Vester-Bitterna") %>%
  select(all_of(fullelectionvariables)) %>%
  as.list()
electiondata <- electiondata %>%
  mutate(across(all_of(fullelectionvariables), ~ if_else(kommun == "Bitterna", . + bitterna_values[[cur_column()]], .)))
electiondata <- filter(electiondata, kommun != "Vester-Bitterna")

## the double reporting of Nysund, one half on in Vermland and one in Örebro. We match on the one in Örebro 
nysundvermland_values <- electiondata %>%
  filter(kommun == "Nysund-Vermland") %>%
  select(all_of(fullelectionvariables)) %>%
  as.list()
electiondata <- electiondata %>%
  mutate(across(all_of(fullelectionvariables), ~ if_else(kommun == "Nysund-Örebro", . + nysundvermland_values[[cur_column()]], .)))
electiondata <- filter(electiondata, kommun != "Nysund-Vermland")

# double reporting of Hishult, one in Halland (the one we want to keep) and one in Kristianstad county
hishult_values <- electiondata %>%
  filter(kommun == "Hishult, länsdel Kr") %>%
  select(all_of(fullelectionvariables)) %>%
  as.list()
electiondata <- electiondata %>%
  mutate(across(all_of(fullelectionvariables), ~ if_else(kommun == "Hishult", . + hishult_values[[cur_column()]], .)))
electiondata <- filter(electiondata, kommun != "Hishult, länsdel Kr")

# same with Kölingared: one part of the parish in Älvsborg, one in Skaraborg
kölingared_values <- electiondata %>%
  filter(kommun == "Kölingared, länsdel") %>%
  select(all_of(fullelectionvariables)) %>%
  as.list()
electiondata <- electiondata %>%
  mutate(across(all_of(fullelectionvariables), ~ if_else(kommun == "Kölingared", . + kölingared_values[[cur_column()]], .)))
electiondata <- filter(electiondata, kommun != "Kölingared, länsdel")

## double reporting of Varv and Styra which is one parish in our data as well as in histmaps, but two in SND
styra_values <- electiondata %>%
  filter(kommun == "Styra") %>%
  select(all_of(fullelectionvariables)) %>%
  as.list()
electiondata <- electiondata %>%
  mutate(across(all_of(fullelectionvariables), ~ if_else(kommun == "Varv-Aska", . + styra_values[[cur_column()]], .)))
electiondata <- filter(electiondata, kommun != "Styra")

## Bureå was created out of Skellefteå LF but we do not have the background data for Bureå. Hence we add the Bureå electoral data to Skellefteå.
bureå_values <- electiondata %>%
  filter(kommun == "Bureå") %>%
  select(all_of(fullelectionvariables)) %>%
  as.list()
electiondata <- electiondata %>%
  mutate(across(all_of(fullelectionvariables), ~ if_else(kommun == "Skellefteå LF", . + bureå_values[[cur_column()]], .)))
electiondata <- filter(electiondata, kommun != "Bureå")

## Södertälje landskommun is in SND divided into two units, Västertälje and Östertälje. 
## the current solution is to rename Vestertelge as Södertälje LF and then to add the Östertälje numbers to that observation
östertelge_values <- electiondata %>%
  filter(kommun == "Östertelge") %>%
  select(all_of(fullelectionvariables)) %>%
  as.list()
electiondata <- electiondata %>%
  mutate(across(all_of(fullelectionvariables), ~ if_else(kommun == "Södertälje LF", . + östertelge_values[[cur_column()]], .)))
electiondata <- filter(electiondata, kommun != "Östertelge")

## note also the problem of Falköping's eastern and western landskommun. As it is we have both observations here but since we won't use them in the analysis, since the eastern
## part in 1935 is absorbed into Falköping town, I won't bother merging them here. If one wants to do analysis for the 1911-1934 period one should consider doing that.

## cleaning the workspace
rm(bitterna_values, björköarholma_values, bureå_values, farila_values, farilavariables, gustaf_values, kölingared_values, hasslö2_values, hishult_values, kvistofta2_values, norrvidinge2_values, nysundvermland_values,
  skatelöv2_values, stehag2_values, styra_values, östertelge_values, fullelectionvariables, gustafvariables, norrfjärd_values, norrfjärdvariables, hortlax_values, hortlaxvariables,
  junosuando_values, junosuandovariables, slite_values, slitevariables, kumlavariables, kumla_values, smögen_values, hofors_values, hoforsvariables, tore_values, torevariables)


## the paper is about rural politics, so we remove cities:
cities_to_remove <- c("STOCKHOL", "SODERTAL", "VAXHOLM", "NORRTALJ", "SOLLKG", "OREGRUND", "SIGTUNA", "DJURSHOL", "LIDING", "SOLNAS", "SUNBYB", "H#VIK@", 
          "OSTHAMMA", "UPPSALA", "ENKOPING", "TIERPKG", "NYKOEPIN", "ESKULSTU", "TORSHALL", "STRANGNA", "MARIEFRE", "TROSA", "KATRINEH", "ESKILSTU",
          "LINKOEPI", "NORRKOEP", "SOEDERK", "MOTALA", "VADSTENA", "SKAENNIN", "MJOELBY", "FINSPKG",
          "JOENKOEP", "EKSJOE", "HUSKVARN", "GRAENNA", "TRANAASK", "N#SSJ@", "V#RNAM", "VETLANDK", "VAEXJOE", "LJUNGS", "TINGSR", "FIGEHOKG", "MOERBYKG", "VISBY",
          "OSKARSHA", "VAESTERV", "MARKARKG", "VIMMERBY", "BORGHOLM", "NYBROS", "1EMMABK", "MARIKG", "BODAKG", "MOENSTKG", "NYBROKG", "VALDEMAR",
          "KARLSKRO", "RONNEBY", "KARLSHAM", "SOELVESB", "OLOFST", "VINSLK",  "TOMEKG", "SIMRISHA", "AENGELHO", "HAESSLEH", "B$STAD", "BAASTAD", "HOERBYKG", "H@@RKG", 
          "SVEK@P", "SKURUPKG", "AAHUSKG", "MALMOE", "LUND", "LANDSKRO", "HAELSING", "ESLOEV", "YSTAD", "TRAELLEB", "SKANOERF", "H@HGAN#S", "BROMKG", "G$RDSA", "H@GAN#S",
          "Halmstad stad", "LAHOLM", "FALKENBE", "VARBERG", "KUNGSBAC", 
          "GOETEBOR", "NYAVARVE", "KUNGAELV", "MARSTRAN", "LYSEKIL", "UDDEVALL", "STROEMST", "BJOERNER", "GREBBEKG", "M@LNDAL", "MELLERKG", "VAENERSB", 
          "ALINGSAA", "BORAAS", "ULRICEHA", "AAMAAL", "TOEREBOK", "GRAESTOK", "MARIESTA", "LIDKOEPI", "SKARA", "SKOEVDE", "HJO", "FALKOEPI", "VARAKG",
          "SUNNEK", "KARLSTAD", "KRISTINE", "FILIPSTA", "ARVIKA", "DEGK@", "BENGTS", "FORSHA",
          "OEREBRO", "ASKERSUN", "NORA", "LINDESBE", "KUMLAS", "KALSKS", "VEASTER", "SALA", "HALLSBKG", "KOPPARKG",
          "KOEPING", "ARBOGA", "FAGERST", "DOMNARV", "BORL#N", "BORLAEKG", "MORASTKG", "SMEDKG", "FALUN", "SAETER", "HEDEMORA", "LUDVIK", "SANDVKG", "BJ@RKKG", "KRYLBO",
          "BOLLK", "BOLLNKG", "F#RK$R", "GAEVLE", "LJUSDAKG", "SOEDERHA", "HUDIKSVA", "SANDIVK", "BOLLN#S", "HAERNOES", "SUNDSVAL", 
          "OERNSKOE", "SOLLEFLK", "#NGERS", "SVEGKG", "LYCKKG", "UMEAA", "V#NN#S", "SKELLEFT", "LULEAA", "PITEAA", "HAPARAND", "BODEN", "LYCKKG")
electiondata <- electiondata[!electiondata$kommun %in% cities_to_remove, ]
rm(cities_to_remove)
## we also want to remove the town Sandviken in Gävleborg, but since this has the same abbreviation in the SND data we remove this by V4 number rather than by abbreviation
electiondata <- subset(electiondata, V4 != 2113080)
## and Vernamo köping, not the Vernamo rural municipality but the urban one
electiondata <- subset(electiondata, V4 != 608090)
## and Kristianstad town which has the same abbreviation as the rural municipality Kristianopel
electiondata <- subset(electiondata, V4 != 1111080)
## and Sundbyberg which also has a problematic abbreviation
electiondata <- subset(electiondata, V4 != 202090)


## for the sake of having a balanced dataset, we also need to remove those municipalities that become towns 
## or are absorbed into towns during the 1911-1944 period. See Appendix B in the paper.
municips_to_remove_for_balance <- c("Almby", "Arvika LF", "Avesta", "Björkäng", "Bollnäs","Borg", "Bromma-Sthlm", "Brunn", 
                                    "By-Vermland", "Båstad", "Degerfors-Örebro", "Falköping LF", "Fors-Rekarne", "Fosie", 
                                    "Fässberg", "Hakarp", "Helsingborg LF", "Husie", "Hyllie", "Högbo", "Kalmar LF", "Karlskoga", 
                                    "Karlstad LF", "Kumla-Örebro", "Lidingö", "Ljungby-Kronoberg", "Lund LF", "Längbro", 
                                    "Norra Åsum", "Othem", "Risinge", "Sandseryd", "Skara LF", "Slite", "Solna", 
                                    "Svedvi", "Torpa-Älvsborg", "Trollhättan", "Vara LF", "Vestra Skreflinge", 
                                    "Vestanfors", "Visby LF", "Vist-Älvsborg", "Växjö LF", "Ånsta", "Örgryte")
electiondata <- electiondata[!electiondata$kommun %in% municips_to_remove_for_balance, ]
rm(municips_to_remove_for_balance)


## for the balance we also drop municipalities which disappear over time because of mergers and the like
## See Appendix B in the paper.
electiondata <- subset(electiondata, kommun != "Arnö") ## Arnö is dissolved in 1943
electiondata <- subset(electiondata, kommun != "Dillnäs") ## Dillnäs and Gåsinge merge in 1941
electiondata <- subset(electiondata, kommun != "Gåsinge") ## Dillnäs and Gåsinge merge in 1941
electiondata <- subset(electiondata, kommun != "Kattunga") ## Kattunga and Surteby merge in 1926
electiondata <- subset(electiondata, kommun != "Surteby") ## Kattunga and Surteby merge in 1926
electiondata <- subset(electiondata, kommun != "SURKAT") ## Kattunga and Surteby merge in 1926
electiondata <- subset(electiondata, kommun != "Bro-Vmanland") ## Bro and Malma merge in 1939
electiondata <- subset(electiondata, kommun != "Malma-Vmanland") ## Bro and Malma merge in 1939
electiondata <- subset(electiondata, kommun != "Trosa LF") ## Trosa and Vagnhärad merge in 1926
electiondata <- subset(electiondata, kommun != "Vagnhärad") ## Trosa and Vagnhärad merge in 1926
electiondata <- subset(electiondata, kommun != "Falköping västra LF") ## incorporated (one half, but it's one observation in our data) in Falköping in 1935
electiondata <- subset(electiondata, kommun != "Falköping östra LF") ## incorporated (one half, but it's one observation in our data) in Falköping in 1935



## fixing errors in the data. inspecting the data we have noticed incongruencies like that a party has >100 % of the votes
## in a municipality. this is because of simple data entry errors in the dataset
## we make the corrections from the information in the original election reports from Statistics Sweden
## https://www.scb.se/hitta-statistik/aldre-statistik/innehall/sveriges-officiella-statistik-sos/valstatistik-19091999/riksdagsmannavalen-1909-1968/
## for further discussion of the many errors in the SND data, see Appendix B which also references previous scholarly discussion of this issue.
electiondata["V108"][electiondata["kommun"] == "Irsta"] <- 310
electiondata["V108"][electiondata["kommun"] == "Vestra Fogelvik"] <- 280
electiondata["V18"][electiondata["kommun"] == "Alva"] <- 133
electiondata["V26"][electiondata["kommun"] == "Byarum"] <- 698

## the 1914 spring election
electiondata["V18"][electiondata["kommun"] == "Stensele"] <- 541
electiondata["V19"][electiondata["kommun"] == "Stensele"] <- 236
electiondata["V20"][electiondata["kommun"] == "Stensele"] <- 236

## the 1914 autumn election
electiondata["V28"][electiondata["kommun"] == "Sölvesborg LF"] <- 77
electiondata["V32"][electiondata["kommun"] == "Sölvesborg LF"] <- 27

## the 1917 election
electiondata["V34"][electiondata["kommun"] == "Lindesberg LF"] <- 3068
electiondata["V35"][electiondata["kommun"] == "Lindesberg LF"] <- 1820
electiondata["V36"][electiondata["kommun"] == "Lindesberg LF"] <- 1815
electiondata["V38"][electiondata["kommun"] == "Lindesberg LF"] <- 113
electiondata["V39"][electiondata["kommun"] == "Lindesberg LF"] <- 439
electiondata["V40"][electiondata["kommun"] == "Lindesberg LF"] <- 471
electiondata["V41"][electiondata["kommun"] == "Lindesberg LF"] <- 714
electiondata["V42"][electiondata["kommun"] == "Lindesberg LF"] <- 79
electiondata["V40"][electiondata["kommun"] == "Mjellby"] <- 210
electiondata["V41"][electiondata["kommun"] == "Mjellby"] <- 116
electiondata["V34"][electiondata["kommun"] == "Vika"] <- 868
electiondata["V35"][electiondata["kommun"] == "Vika"] <- 613
electiondata["V36"][electiondata["kommun"] == "Vika"] <- 612
electiondata["V38"][electiondata["kommun"] == "Vika"] <- 64
electiondata["V39"][electiondata["kommun"] == "Vika"] <- 66
electiondata["V40"][electiondata["kommun"] == "Vika"] <- 92
electiondata["V41"][electiondata["kommun"] == "Vika"] <- 191
electiondata["V42"][electiondata["kommun"] == "Vika"] <- 198
electiondata["V41"][electiondata["kommun"] == "Los"] <- 232

## the 1920 election
electiondata["V48"][electiondata["kommun"] == "Hökhuvud"] <- 0
electiondata["V47"][electiondata["kommun"] == "Huddinge"] <- 282
electiondata["V46"][electiondata["kommun"] == "Vreta kloster"] <- 334
electiondata["V53"][electiondata["kommun"] == "Godegård"] <- 48
electiondata["V53"][electiondata["kommun"] == "Döderhult"] <- 74
electiondata["V57"][electiondata["kommun"] == "Vesterhejde"] <- 6
electiondata["V53"][electiondata["kommun"] == "Kristianopel"] <- 88
electiondata["V47"][electiondata["kommun"] == "Skurup"] <- 215
electiondata["V51"][electiondata["kommun"] == "Skurup"] <- 86
electiondata["V52"][electiondata["kommun"] == "Skurup"] <- 0
electiondata["V53"][electiondata["kommun"] == "Skurup"] <- 59
electiondata["V54"][electiondata["kommun"] == "Skurup"] <- 0
electiondata["V55"][electiondata["kommun"] == "Skurup"] <- 69
electiondata["V56"][electiondata["kommun"] == "Skurup"] <- 0
electiondata["V57"][electiondata["kommun"] == "Skurup"] <- 1
electiondata["V51"][electiondata["kommun"] == "Espö"] <- 7
electiondata["V52"][electiondata["kommun"] == "Espö"] <- 9
electiondata["V53"][electiondata["kommun"] == "Espö"] <- 12
electiondata["V55"][electiondata["kommun"] == "Espö"] <- 21
electiondata["V51"][electiondata["kommun"] == "Flenninge"] <- 28
electiondata["V53"][electiondata["kommun"] == "Flenninge"] <- 17
electiondata["V55"][electiondata["kommun"] == "Flenninge"] <- 90
electiondata["V57"][electiondata["kommun"] == "Flenninge"] <- 77
electiondata["V57"][electiondata["kommun"] == "Björka"] <- 4
electiondata["V51"][electiondata["kommun"] == "Örtofta"] <- 31
electiondata["V55"][electiondata["kommun"] == "Örtofta"] <- 104
electiondata["V57"][electiondata["kommun"] == "Örtofta"] <- 11
electiondata["V44"][electiondata["kommun"] == "Kinna"] <- 393
electiondata["V46"][electiondata["kommun"] == "Kinna"] <- 393
electiondata["V51"][electiondata["kommun"] == "Hassle"] <- 40
electiondata["V52"][electiondata["kommun"] == "Stavnäs"] <- 3
electiondata["V52"][electiondata["kommun"] == "Tillberga"] <- 32
electiondata["V47"][electiondata["kommun"] == "Söderala"] <- 1317
electiondata["V46"][electiondata["kommun"] == "Norra Ny"] <- 287
electiondata["V47"][electiondata["kommun"] == "Njutånger"] <- 379


## the 1921 election
electiondata["V62"][electiondata["kommun"] == "Ununge"] <- 679
electiondata["V58"][electiondata["kommun"] == "Ösmo"] <- 1307
electiondata["V58"][electiondata["kommun"] == "Ledeberg"] <- 252
electiondata["V65"][electiondata["kommun"] == "Kvillinge"] <- 1369
electiondata["V58"][electiondata["kommun"] == "Östra Skrukeby"] <- 244
electiondata["V58"][electiondata["kommun"] == "Lommaryd"] <- 905
electiondata["V61"][electiondata["kommun"] == "Barkeryd"] <- 634
electiondata["V61"][electiondata["kommun"] == "Södra Ljunga"] <- 349
electiondata["V58"][electiondata["kommun"] == "Högsrum"] <- 394
electiondata["V59"][electiondata["kommun"] == "Rörum"] <- 95
electiondata["V58"][electiondata["kommun"] == "Östra Ingelstad"] <- 299
electiondata["V58"][electiondata["kommun"] == "Eljaröd"] <- 299
electiondata["V64"][electiondata["kommun"] == "Grönby"] <- 266
electiondata["V61"][electiondata["kommun"] == "Kävlinge"] <- 929
electiondata["V58"][electiondata["kommun"] == "Frillestad"] <- 293
electiondata["V61"][electiondata["kommun"] == "Frenninge"] <- 546
electiondata["V65"][electiondata["kommun"] == "Snårestad"] <- 208
electiondata["V58"][electiondata["kommun"] == "Vestra Nöbbelöf"] <- 389
electiondata["V58"][electiondata["kommun"] == "Torsby"] <- 948
electiondata["V64"][electiondata["kommun"] == "Norum"] <- 383
electiondata["V58"][electiondata["kommun"] == "Solberga-Bohus"] <- 1077
electiondata["V64"][electiondata["kommun"] == "Bottna"] <- 161
electiondata["V65"][electiondata["kommun"] == "Bottna"] <- 164
electiondata["V58"][electiondata["kommun"] == "Käringön"] <- 362
electiondata["V61"][electiondata["kommun"] == "Dalskog"] <- 332
electiondata["V62"][electiondata["kommun"] == "Dalskog"] <- 330
electiondata["V58"][electiondata["kommun"] == "Ödeborg"] <- 667
electiondata["V58"][electiondata["kommun"] == "Tidaholm"] <- 2606
electiondata["V64"][electiondata["kommun"] == "Böja"] <- 121
electiondata["V65"][electiondata["kommun"] == "Böja"] <- 131
electiondata["V64"][electiondata["kommun"] == "Sal"] <- 113
electiondata["V65"][electiondata["kommun"] == "Sal"] <- 127
electiondata["V58"][electiondata["kommun"] == "Vinköl"] <- 496
electiondata["V60"][electiondata["kommun"] == "Ölme"] <- 284
electiondata["V59"][electiondata["kommun"] == "Grava"] <- 1245
electiondata["V64"][electiondata["kommun"] == "Nordmaling"] <- 2116
electiondata["V58"][electiondata["kommun"] == "Neder-Kalix"] <- 7288


## the 1924 election
electiondata["V74"][electiondata["kommun"] == "Harg"] <- 390
electiondata["V79"][electiondata["kommun"] == "Riala"] <- 300
electiondata["V72"][electiondata["kommun"] == "Södertälje LF"] <- 1018
electiondata["V74"][electiondata["kommun"] == "Forsa-Villåttinge"] <- 84
electiondata["V78"][electiondata["kommun"] == "Ulrika"] <- 363
electiondata["V72"][electiondata["kommun"] == "Norra Vi"] <- 557
electiondata["V76"][electiondata["kommun"] == "Ramkvilla"] <- 375
electiondata["V72"][electiondata["kommun"] == "Almesåkra"] <- 300
electiondata["V75"][electiondata["kommun"] == "Vestra Torsås"] <- 738
electiondata["V75"][electiondata["kommun"] == "Etelhem"] <- 177
electiondata["V74"][electiondata["kommun"] == "Listerby"] <- 310
electiondata["V72"][electiondata["kommun"] == "Fjelkestad"] <- 787
electiondata["V72"][electiondata["kommun"] == "Verum"] <- 736
electiondata["V72"][electiondata["kommun"] == "Virke"] <- 144
electiondata["V72"][electiondata["kommun"] == "Ränneslöv"] <- 1364
electiondata["V79"][electiondata["kommun"] == "Röra"] <- 463
electiondata["V72"][electiondata["kommun"] == "Öckerö"] <- 2825
electiondata["V72"][electiondata["kommun"] == "Nössemark"] <- 859
electiondata["V72"][electiondata["kommun"] == "Gunnarsnäs"] <- 560
electiondata["V72"][electiondata["kommun"] == "Marbäck-Älvsborg"] <- 385
electiondata["V74"][electiondata["kommun"] == "Berg-Skaraborg"] <- 66
electiondata["V79"][electiondata["kommun"] == "Mölltorp"] <- 635
electiondata["V85"][electiondata["kommun"] == "Skarke"] <- 13
electiondata["V72"][electiondata["kommun"] == "Sura"] <- 2018
electiondata["V72"][electiondata["kommun"] == "Falu LF"] <- 3673
electiondata["V76"][electiondata["kommun"] == "Helgum"] <- 968
electiondata["V72"][electiondata["kommun"] == "Fjällsjö"] <- 1170
electiondata["V85"][electiondata["kommun"] == "Frösön"] <- 61


## the 1928 election
electiondata["V96"][electiondata["kommun"] == "Huddinge"] <- 156
electiondata["V91"][electiondata["kommun"] == "Jumkil"] <- 241
electiondata["V91"][electiondata["kommun"] == "Åkerby"] <- 113
electiondata["V94"][electiondata["kommun"] == "Teda"] <- 90
electiondata["V91"][electiondata["kommun"] == "Tunaberg"] <- 744
electiondata["V91"][electiondata["kommun"] == "Lunda-Jönåker"] <- 667 
electiondata["V91"][electiondata["kommun"] == "Kila-Jönåker"] <-  698
electiondata["V91"][electiondata["kommun"] == "Björkvik"] <- 1323
electiondata["V91"][electiondata["kommun"] == "St Nikolai"] <- 1666
electiondata["V91"][electiondata["kommun"] == "Tystberga"] <- 566
electiondata["V91"][electiondata["kommun"] == "Vestra Vingåker"] <- 3450
electiondata["V91"][electiondata["kommun"] == "Julita"] <- 1212
electiondata["V91"][electiondata["kommun"] == "Österåker-Oppunda"] <- 589
electiondata["V91"][electiondata["kommun"] == "Bettna"] <- 682
electiondata["V91"][electiondata["kommun"] == "Vrena"] <- 393
electiondata["V91"][electiondata["kommun"] == "Årdala"] <- 359
electiondata["V91"][electiondata["kommun"] == "Malmköping"] <- 457
electiondata["V91"][electiondata["kommun"] == "Lilla Mellösa"] <- 997
electiondata["V91"][electiondata["kommun"] == "Flen"] <- 1518
electiondata["V91"][electiondata["kommun"] == "Gillberga-Sörmland"] <- 417
electiondata["V91"][electiondata["kommun"] == "Ärla"] <- 806
electiondata["V91"][electiondata["kommun"] == "Husby-Rekarne"] <- 926
electiondata["V90"][electiondata["kommun"] == "Frustuna"] <- 1109
electiondata["V91"][electiondata["kommun"] == "Strengnäs LF"] <- 537
electiondata["V99"][electiondata["kommun"] == "Börrum"] <- 33
electiondata["V100"][electiondata["kommun"] == "Börrum"] <- 0
electiondata["V87"][electiondata["kommun"] == "Landeryd"] <- 675
electiondata["V87"][electiondata["kommun"] == "Kumla-Lysing"] <- 128 
electiondata["V94"][electiondata["kommun"] == "Heda"] <- 245
electiondata["V93"][electiondata["kommun"] == "Ask-Aska"] <- 79
electiondata["V94"][electiondata["kommun"] == "Ask-Aska"] <- 84
electiondata["V87"][electiondata["kommun"] == "Kristberg"] <- 1286
electiondata["V87"][electiondata["kommun"] == "Hult"] <- 725
electiondata["V87"][electiondata["kommun"] == "Gårdsby"] <- 739
electiondata["V89"][electiondata["kommun"] == "Rumskulla"] <- 194
electiondata["V92"][electiondata["kommun"] == "Arby"] <- 0
electiondata["V87"][electiondata["kommun"] == "Hjortsberga-Blekinge"] <- 645
electiondata["V100"][electiondata["kommun"] == "Rödeby"] <- 53
electiondata["V88"][electiondata["kommun"] == "Kyrkhult"] <- 894
electiondata["V94"][electiondata["kommun"] == "Brönnestad"] <- 237
electiondata["V87"][electiondata["kommun"] == "Fjelkinge"] <- 790
electiondata["V87"][electiondata["kommun"] == "Södra Sandby"] <- 1144
electiondata["V96"][electiondata["kommun"] == "Burlöf"] <- 146
electiondata["V99"][electiondata["kommun"] == "Billeberga"] <- 263
electiondata["V94"][electiondata["kommun"] == "Tullstorp"] <- 245
electiondata["V87"][electiondata["kommun"] == "Annelöv"] <- 561
electiondata["V91"][electiondata["kommun"] == "Enslöv"] <- 1741
electiondata["V91"][electiondata["kommun"] == "Tvååker"] <- 896
electiondata["V91"][electiondata["kommun"] == "Lindome"] <- 1061
electiondata["V87"][electiondata["kommun"] == "Öckerö"] <- 3073
electiondata["V88"][electiondata["kommun"] == "Partille"] <- 1401
electiondata["V94"][electiondata["kommun"] == "Ucklum"] <- 349
electiondata["V87"][electiondata["kommun"] == "Fritsla"] <- 1554
electiondata["V99"][electiondata["kommun"] == "Väring"] <- 111
electiondata["V95"][electiondata["kommun"] == "Ryda"] <- 367
electiondata["V87"][electiondata["kommun"] == "Saleby"] <- 839
electiondata["V88"][electiondata["kommun"] == "Saleby"] <- 272
electiondata["V89"][electiondata["kommun"] == "Saleby"] <- 209
electiondata["V90"][electiondata["kommun"] == "Saleby"] <- 481
electiondata["V91"][electiondata["kommun"] == "Saleby"] <- 481
electiondata["V92"][electiondata["kommun"] == "Saleby"] <- 0
electiondata["V93"][electiondata["kommun"] == "Saleby"] <- 414
electiondata["V94"][electiondata["kommun"] == "Saleby"] <- 425
electiondata["V95"][electiondata["kommun"] == "Saleby"] <- 248
electiondata["V96"][electiondata["kommun"] == "Saleby"] <- 106
electiondata["V97"][electiondata["kommun"] == "Saleby"] <- 1
electiondata["V98"][electiondata["kommun"] == "Saleby"] <- 40
electiondata["V99"][electiondata["kommun"] == "Saleby"] <- 86
electiondata["V100"][electiondata["kommun"] == "Saleby"] <- 0
electiondata["V91"][electiondata["kommun"] == "Amnehärad"] <- 1029
electiondata["V93"][electiondata["kommun"] == "Habo"] <- 826
electiondata["V88"][electiondata["kommun"] == "Gåsborn"] <- 277
electiondata["V87"][electiondata["kommun"] == "Lindesberg LF"] <- 5267
electiondata["V91"][electiondata["kommun"] == "Lindesberg LF"] <- 3018
electiondata["V99"][electiondata["kommun"] == "Kolbäck"] <- 883
electiondata["V90"][electiondata["kommun"] == "Munktorp"] <- 996
electiondata["V99"][electiondata["kommun"] == "Älvdalen"] <- 1043
electiondata["V90"][electiondata["kommun"] == "Torsåker-Vnorrland"] <- 438
electiondata["V87"][electiondata["kommun"] == "Rödön"] <- 1737


## the 1932 election
electiondata["V104"][electiondata["kommun"] == "Norrsunda"] <- 262
electiondata["V104"][electiondata["kommun"] == "Utö"] <- 76
electiondata["V104"][electiondata["kommun"] == "Sollentuna"] <- 4323
electiondata["V113"][electiondata["kommun"] == "Skönberga"] <- 123
electiondata["V113"][electiondata["kommun"] == "Heda"] <- 102
electiondata["V105"][electiondata["kommun"] == "Väderstad"] <- 554
electiondata["V104"][electiondata["kommun"] == "Båraryd"] <- 1066
electiondata["V102"][electiondata["kommun"] == "Helleberga"] <- 531
electiondata["V103"][electiondata["kommun"] == "Loftahammar"] <- 323
electiondata["V104"][electiondata["kommun"] == "Loftahammar"] <- 686
electiondata["V109"][electiondata["kommun"] == "Lofta"] <- 150
electiondata["V102"][electiondata["kommun"] == "Hangvar"] <- 195
electiondata["V109"][electiondata["kommun"] == "Kyrkhult"] <- 668
electiondata["V104"][electiondata["kommun"] == "Önnestad"] <- 585
electiondata["V104"][electiondata["kommun"] == "Örsjö-Malmöhus"] <- 441
electiondata["V104"][electiondata["kommun"] == "Norra Svalöv"] <- 1095
electiondata["V104"][electiondata["kommun"] == "Bjuv"] <- 1399
electiondata["V117"][electiondata["kommun"] == "Billeberga"] <- 5
electiondata["V104"][electiondata["kommun"] == "Skrea"] <- 566
electiondata["V105"][electiondata["kommun"] == "Skrea"] <- 564
electiondata["V105"][electiondata["kommun"] == "Bro-Bohus"] <- 1270
electiondata["V105"][electiondata["kommun"] == "Lerum"] <- 668
electiondata["V113"][electiondata["kommun"] == "Börstig"] <- 3
electiondata["V115"][electiondata["kommun"] == "Börstig"] <- 0
electiondata["V102"][electiondata["kommun"] == "Naum"] <- 223
electiondata["V104"][electiondata["kommun"] == "Götlunda-Skaraborg"] <- 560
electiondata["V104"][electiondata["kommun"] == "Tråvad"] <- 355
electiondata["V113"][electiondata["kommun"] == "Millesvik"] <- 30
electiondata["V116"][electiondata["kommun"] == "Millesvik"] <- 0
electiondata["V102"][electiondata["kommun"] == "Tveta-Vermland"] <- 228
electiondata["V104"][electiondata["kommun"] == "Grythyttan"] <- 1220
electiondata["V104"][electiondata["kommun"] == "Kolbäck"] <- 1612


# the 1936 election
electiondata["V118"][electiondata["kommun"] == "Fresta"] <- 647
electiondata["V124"][electiondata["kommun"] == "Östuna"] <- 172
electiondata["V125"][electiondata["kommun"] == "Östuna"] <- 165
electiondata["V124"][electiondata["kommun"] == "Österhaninge"] <- 993
electiondata["V122"][electiondata["kommun"] == "Fasterna"] <- 592
electiondata["V131"][electiondata["kommun"] == "Östra Ryd-Skärkind"] <- 2
electiondata["V127"][electiondata["kommun"] == "Hagebyhöga"] <- 57
electiondata["V128"][electiondata["kommun"] == "Hagebyhöga"] <- 16
electiondata["V129"][electiondata["kommun"] == "Hagebyhöga"] <- 89
electiondata["V130"][electiondata["kommun"] == "Hagebyhöga"] <- 19
electiondata["V131"][electiondata["kommun"] == "Hagebyhöga"] <- 1
electiondata["V132"][electiondata["kommun"] == "Hagebyhöga"] <- 5
electiondata["V130"][electiondata["kommun"] == "Öja-Kinnevalds"] <- 26
electiondata["V131"][electiondata["kommun"] == "Öja-Kinnevalds"] <- 40
electiondata["V118"][electiondata["kommun"] == "Traryd"] <- 2096
electiondata["V118"][electiondata["kommun"] == "Tjureda"] <- 505
electiondata["V122"][electiondata["kommun"] == "Kristdala"] <- 1400
electiondata["V120"][electiondata["kommun"] == "Asarum"] <- 1780
electiondata["V125"][electiondata["kommun"] == "Jemshög"] <- 1644
electiondata["V118"][electiondata["kommun"] == "Östra Harg"] <- 283
electiondata["V129"][electiondata["kommun"] == "Glimåkra"] <- 663
electiondata["V118"][electiondata["kommun"] == "Lilla Isie"] <- 389
electiondata["V118"][electiondata["kommun"] == "Östra Torp"] <- 521
electiondata["V124"][electiondata["kommun"] == "Östra Torp"] <- 255
electiondata["V125"][electiondata["kommun"] == "Östra Torp"] <- 256
electiondata["V126"][electiondata["kommun"] == "Östra Torp"] <- 26
electiondata["V127"][electiondata["kommun"] == "Östra Torp"] <- 54
electiondata["V128"][electiondata["kommun"] == "Östra Torp"] <- 64
electiondata["V129"][electiondata["kommun"] == "Östra Torp"] <- 260
electiondata["V130"][electiondata["kommun"] == "Östra Torp"] <- 6
electiondata["V122"][electiondata["kommun"] == "Espö"] <- 152
electiondata["V118"][electiondata["kommun"] == "Borrlunda"] <- 282
electiondata["V124"][electiondata["kommun"] == "Kågeröd"] <- 586
electiondata["V118"][electiondata["kommun"] == "Stehag"] <- 946
electiondata["V118"][electiondata["kommun"] == "Brunnby"] <- 2046
electiondata["V125"][electiondata["kommun"] == "Skurup"] <- 735
electiondata["V124"][electiondata["kommun"] == "Bro-Bohus"] <- 833
electiondata["V127"][electiondata["kommun"] == "Herrestad-Bohus"] <- 160
electiondata["V133"][electiondata["kommun"] == "Herrestad-Bohus"] <- 5
electiondata["V118"][electiondata["kommun"] == "Tunge"] <- 415
electiondata["V124"][electiondata["kommun"] == "Gunnarsjö"] <- 145
electiondata["V125"][electiondata["kommun"] == "Gunnarsjö"] <- 133
electiondata["V121"][electiondata["kommun"] == "Herrljunga"] <- 932
electiondata["V129"][electiondata["kommun"] == "Händene"] <- 32
electiondata["V118"][electiondata["kommun"] == "Jäla"] <- 299
electiondata["V124"][electiondata["kommun"] == "Tengene"] <- 212
electiondata["V125"][electiondata["kommun"] == "Tengene"] <- 205
electiondata["V124"][electiondata["kommun"] == "Hangelösa"] <- 229
electiondata["V125"][electiondata["kommun"] == "Hangelösa"] <- 228
electiondata["V118"][electiondata["kommun"] == "Hagelberg"] <- 130
electiondata["V124"][electiondata["kommun"] == "Mölltorp"] <- 605
electiondata["V125"][electiondata["kommun"] == "Mölltorp"] <- 594
electiondata["V118"][electiondata["kommun"] == "Lyrestad"] <- 1592
electiondata["V121"][electiondata["kommun"] == "Millesvik"] <- 177
electiondata["V131"][electiondata["kommun"] == "Östra Fogelvik"] <- 19
electiondata["V125"][electiondata["kommun"] == "Kroppa"] <- 1497
electiondata["V118"][electiondata["kommun"] == "Tysslinge"] <- 1247
electiondata["V118"][electiondata["kommun"] == "Axberg"] <- 1100
electiondata["V125"][electiondata["kommun"] == "Hidinge"] <- 524
electiondata["V124"][electiondata["kommun"] == "Askersund LF"] <- 813
electiondata["V125"][electiondata["kommun"] == "Askersund LF"] <- 745
electiondata["V118"][electiondata["kommun"] == "Torsåker-Gävleborg"] <- 2563
electiondata["V118"][electiondata["kommun"] == "Delsbo"] <- 3374
electiondata["V124"][electiondata["kommun"] == "Nordingrå"] <- 1091
electiondata["V118"][electiondata["kommun"] == "Myssjö"] <- 692


## the 1940 election
electiondata["V140"][electiondata["kommun"] == "Botkyrka"] <- 1716
electiondata["V141"][electiondata["kommun"] == "Botkyrka"] <- 1881
electiondata["V140"][electiondata["kommun"] == "Våxtorp-Halland"] <- 748
electiondata["V141"][electiondata["kommun"] == "Våxtorp-Halland"] <- 698
electiondata["V140"][electiondata["kommun"] == "Istrum"] <- 126
electiondata["V141"][electiondata["kommun"] == "Istrum"] <- 110
electiondata["V140"][electiondata["kommun"] == "Jung"] <- 231
electiondata["V141"][electiondata["kommun"] == "Jung"] <- 227
electiondata["V140"][electiondata["kommun"] == "Laske-Vedum"] <- 401
electiondata["V141"][electiondata["kommun"] == "Laske-Vedum"] <- 383
electiondata["V134"][electiondata["kommun"] == "Ornö"] <- 255
electiondata["V134"][electiondata["kommun"] == "Österhaninge"] <- 2089
electiondata["V134"][electiondata["kommun"] == "Estuna"] <- 598
electiondata["V134"][electiondata["kommun"] == "Bettna"] <- 1041
electiondata["V134"][electiondata["kommun"] == "Konungsund"] <- 257
electiondata["V134"][electiondata["kommun"] == "Vist-Hanekind"] <- 890
electiondata["V134"][electiondata["kommun"] == "Nässja"] <- 139
electiondata["V134"][electiondata["kommun"] == "Bankeryd"] <- 1176
electiondata["V140"][electiondata["kommun"] == "Öreryd"] <- 95
electiondata["V141"][electiondata["kommun"] == "Öreryd"] <- 103
electiondata["V134"][electiondata["kommun"] == "Torskinge"] <- 316
electiondata["V134"][electiondata["kommun"] == "Sundre"] <- 90
electiondata["V141"][electiondata["kommun"] == "Mörrum"] <- 1242
electiondata["V134"][electiondata["kommun"] == "Perstorp"] <- 1575
electiondata["V134"][electiondata["kommun"] == "Burlöf"] <- 3436
electiondata["V134"][electiondata["kommun"] == "Vanstad"] <- 916
electiondata["V134"][electiondata["kommun"] == "Löfvestad"] <- 1400
electiondata["V134"][electiondata["kommun"] == "Örja"] <- 703
electiondata["V134"][electiondata["kommun"] == "Norra Skreflinge"] <- 758
electiondata["V134"][electiondata["kommun"] == "Snårestad"] <- 380
electiondata["V134"][electiondata["kommun"] == "Frenninge"] <- 1277
electiondata["V134"][electiondata["kommun"] == "Östra Strö"] <- 424
electiondata["V134"][electiondata["kommun"] == "Svensköp"] <- 470
electiondata["V134"][electiondata["kommun"] == "Bodarp"] <- 171
electiondata["V134"][electiondata["kommun"] == "Bredared-Halland"] <- 969
electiondata["V134"][electiondata["kommun"] == "Enslöv"] <- 2542
electiondata["V134"][electiondata["kommun"] == "Hålta"] <- 434
electiondata["V141"][electiondata["kommun"] == "Södra Åsarp"] <- 266
electiondata["V134"][electiondata["kommun"] == "Ornunga"] <- 226
electiondata["V134"][electiondata["kommun"] == "Skölfvene"] <- 212
electiondata["V134"][electiondata["kommun"] == "Brämhult"] <- 528
electiondata["V140"][electiondata["kommun"] == "Brämhult"] <- 262
electiondata["V134"][electiondata["kommun"] == "Humla"] <- 166
electiondata["V134"][electiondata["kommun"] == "Väla"] <- 162
electiondata["V134"][electiondata["kommun"] == "Norra Ving"] <- 386
electiondata["V134"][electiondata["kommun"] == "Gillstad"] <- 258
electiondata["V134"][electiondata["kommun"] == "Bjerka"] <- 139
electiondata["V141"][electiondata["kommun"] == "Agnetorp"] <- 663
electiondata["V134"][electiondata["kommun"] == "Nykyrka-Skaraborg"] <- 759
electiondata["V134"][electiondata["kommun"] == "Valstad"] <- 249
electiondata["V134"][electiondata["kommun"] == "Hassle"] <- 865
electiondata["V134"][electiondata["kommun"] == "Östmark"] <- 1943
electiondata["V134"][electiondata["kommun"] == "Rudskoga"] <- 767
electiondata["V134"][electiondata["kommun"] == "Nedre Ullerud"] <- 2887
electiondata["V134"][electiondata["kommun"] == "Kroppa"] <- 3496
electiondata["V134"][electiondata["kommun"] == "Snaflunda"] <- 1065
electiondata["V134"][electiondata["kommun"] == "Falu LF"] <- 4640
electiondata["V134"][electiondata["kommun"] == "Fläckebo"] <- 623
electiondata["V134"][electiondata["kommun"] == "Hackås"] <- 997
electiondata["V136"][electiondata["kommun"] == "Tegnaby"] <- 103
electiondata["V137"][electiondata["kommun"] == "Stora Harrie"] <- 533
electiondata["V137"][electiondata["kommun"] == "Bårslöf"] <- 252
electiondata["V137"][electiondata["kommun"] == "Sillhöfda"] <- 730
electiondata["V137"][electiondata["kommun"] == "Brastad"] <- 1421
electiondata["V137"][electiondata["kommun"] == "Väring"] <- 394
electiondata["V137"][electiondata["kommun"] == "Sölvesborg LF"] <- 391
electiondata["V137"][electiondata["kommun"] == "Habo"] <- 1230
electiondata["V137"][electiondata["kommun"] == "Hornborga"] <- 113



## the 1944 election
electiondata["V154"][electiondata["kommun"] == "Valö"] <- 457
electiondata["V155"][electiondata["kommun"] == "Valö"] <- 428
electiondata["V154"][electiondata["kommun"] == "Furingstad"] <- 133
electiondata["V155"][electiondata["kommun"] == "Furingstad"] <- 115
electiondata["V154"][electiondata["kommun"] == "Kärna"] <- 592
electiondata["V155"][electiondata["kommun"] == "Kärna"] <- 537
electiondata["V155"][electiondata["kommun"] == "Kuddby"] <- 286
electiondata["V154"][electiondata["kommun"] == "Alingsås LF"] <- 790
electiondata["V155"][electiondata["kommun"] == "Alingsås LF"] <- 803
electiondata["V154"][electiondata["kommun"] == "Hillared"] <- 198
electiondata["V155"][electiondata["kommun"] == "Hillared"] <- 200
electiondata["V155"][electiondata["kommun"] == "Romfartuna"] <- 357
electiondata["V154"][electiondata["kommun"] == "Vestra Ingelstad"] <- 199
electiondata["V148"][electiondata["kommun"] == "Hilleshög"] <- 323
electiondata["V148"][electiondata["kommun"] == "Kalmar-Uppland"] <- 390
electiondata["V148"][electiondata["kommun"] == "Tillinge"] <- 725
electiondata["V148"][electiondata["kommun"] == "Skefthammar"] <- 913
electiondata["V154"][electiondata["kommun"] == "Jonsberg"] <- 429
electiondata["V155"][electiondata["kommun"] == "Jonsberg"] <- 420
electiondata["V148"][electiondata["kommun"] == "Orlunda"] <- 235
electiondata["V148"][electiondata["kommun"] == "Yxnerum"] <- 390
electiondata["V148"][electiondata["kommun"] == "Högby-Göstring"] <- 644
electiondata["V154"][electiondata["kommun"] == "Vallerstad"] <- 186
electiondata["V155"][electiondata["kommun"] == "Vallerstad"] <- 173
electiondata["V151"][electiondata["kommun"] == "Ringarum"] <- 2254
electiondata["V151"][electiondata["kommun"] == "Vestra Harg"] <- 558
electiondata["V148"][electiondata["kommun"] == "Hjortsberga-Kronoberg"] <- 703
electiondata["V148"][electiondata["kommun"] == "Mistelås"] <- 299
electiondata["V148"][electiondata["kommun"] == "Dädesjö"] <- 783
electiondata["V148"][electiondata["kommun"] == "Mjellby"] <- 3427
electiondata["V148"][electiondata["kommun"] == "Sillhöfda"] <- 1322
electiondata["V148"][electiondata["kommun"] == "Ronneby LF"] <- 5296
electiondata["V148"][electiondata["kommun"] == "Torrlösa"] <- 819
electiondata["V155"][electiondata["kommun"] == "Östra Espinge"] <- 245
electiondata["V148"][electiondata["kommun"] == "Håstad"] <- 319
electiondata["V148"][electiondata["kommun"] == "Stehag"] <- 982
electiondata["V148"][electiondata["kommun"] == "Flackarp"] <- 122
electiondata["V148"][electiondata["kommun"] == "Stora Harrie"] <- 582
electiondata["V149"][electiondata["kommun"] == "Holmby"] <- 280
electiondata["V151"][electiondata["kommun"] == "Holmby"] <- 528
electiondata["V151"][electiondata["kommun"] == "Södra Sandby"] <- 1003
electiondata["V151"][electiondata["kommun"] == "Reslöf"] <- 1062
electiondata["V151"][electiondata["kommun"] == "Vestra Karleby"] <- 627
electiondata["V151"][electiondata["kommun"] == "Brågarp"] <- 191
electiondata["V154"][electiondata["kommun"] == "Fagerred"] <- 243
electiondata["V155"][electiondata["kommun"] == "Fagerred"] <- 224
electiondata["V148"][electiondata["kommun"] == "Forshälla"] <- 1052
electiondata["V148"][electiondata["kommun"] == "Ör-Nordal"] <- 893
electiondata["V148"][electiondata["kommun"] == "Starrkärr"] <- 2999
electiondata["V148"][electiondata["kommun"] == "Örsås"] <- 645
electiondata["V148"][electiondata["kommun"] == "Timmersdala"] <- 306
electiondata["V148"][electiondata["kommun"] == "Bolum"] <- 356
electiondata["V148"][electiondata["kommun"] == "Jung"] <- 450
electiondata["V148"][electiondata["kommun"] == "Ekeskog"] <- 233
electiondata["V148"][electiondata["kommun"] == "Götlunda-Skaraborg"] <- 849
electiondata["V148"][electiondata["kommun"] == "Färed"] <- 122
electiondata["V148"][electiondata["kommun"] == "Borgvik"] <- 482
electiondata["V148"][electiondata["kommun"] == "Norrbyås"] <- 469
electiondata["V148"][electiondata["kommun"] == "Fellingsbro"] <- 4001
electiondata["V148"][electiondata["kommun"] == "Grundsunda"] <- 2619
electiondata["V149"][electiondata["kommun"] == "Od"] <- 183
electiondata["V151"][electiondata["kommun"] == "Mellby-Skaraborg"] <- 207
electiondata["V151"][electiondata["kommun"] == "Norrbyås"] <- 334
electiondata["V151"][electiondata["kommun"] == "Transtrand"] <- 829



## Lofta in Kalmar county has errors in the party choice variables in 1932 -- according to the figures 4,75 times as many people cast a vote for a party, as cast a vote overall.
## i have taken the correct numbers from the Statistics Sweden report on the 1932 election
electiondata["V109"][electiondata["kommun"] == "Lofta"] <- 115
electiondata["V110"][electiondata["kommun"] == "Lofta"] <- 215
electiondata["V111"][electiondata["kommun"] == "Lofta"] <- 0
electiondata["V112"][electiondata["kommun"] == "Lofta"] <- 22
electiondata["V113"][electiondata["kommun"] == "Lofta"] <- 310
electiondata["V114"][electiondata["kommun"] == "Lofta"] <- 0
electiondata["V115"][electiondata["kommun"] == "Lofta"] <- 8
electiondata["V116"][electiondata["kommun"] == "Lofta"] <- 31

## Heda, Kumla and Rök in Lysings härad in Östergötland for some reason are missing data for 1911-1917
electiondata["V10"][electiondata["kommun"] == "Heda"] <- 203
electiondata["V11"][electiondata["kommun"] == "Heda"] <- 171
electiondata["V12"][electiondata["kommun"] == "Heda"] <- 171
electiondata["V13"][electiondata["kommun"] == "Heda"] <- 0
electiondata["V14"][electiondata["kommun"] == "Heda"] <- 125
electiondata["V15"][electiondata["kommun"] == "Heda"] <- 2
electiondata["V16"][electiondata["kommun"] == "Heda"] <- 44

electiondata["V10"][electiondata["kommun"] == "Kumla-Lysing"] <- 54 
electiondata["V11"][electiondata["kommun"] == "Kumla-Lysing"] <- 42
electiondata["V12"][electiondata["kommun"] == "Kumla-Lysing"] <- 42
electiondata["V13"][electiondata["kommun"] == "Kumla-Lysing"] <- 0
electiondata["V14"][electiondata["kommun"] == "Kumla-Lysing"] <- 20
electiondata["V15"][electiondata["kommun"] == "Kumla-Lysing"] <- 14
electiondata["V16"][electiondata["kommun"] == "Kumla-Lysing"] <- 8

electiondata["V10"][electiondata["kommun"] == "Rök"] <- 218
electiondata["V11"][electiondata["kommun"] == "Rök"] <- 112
electiondata["V12"][electiondata["kommun"] == "Rök"] <- 111
electiondata["V13"][electiondata["kommun"] == "Rök"] <- 1
electiondata["V14"][electiondata["kommun"] == "Rök"] <- 61
electiondata["V15"][electiondata["kommun"] == "Rök"] <- 20
electiondata["V16"][electiondata["kommun"] == "Rök"] <- 30

electiondata["V18"][electiondata["kommun"] == "Heda"] <- 201
electiondata["V19"][electiondata["kommun"] == "Heda"] <- 170
electiondata["V20"][electiondata["kommun"] == "Heda"] <- 168
electiondata["V21"][electiondata["kommun"] == "Heda"] <- 2
electiondata["V22"][electiondata["kommun"] == "Heda"] <- 133
electiondata["V23"][electiondata["kommun"] == "Heda"] <- 6
electiondata["V24"][electiondata["kommun"] == "Heda"] <- 29

electiondata["V18"][electiondata["kommun"] == "Kumla-Lysing"] <- 52
electiondata["V19"][electiondata["kommun"] == "Kumla-Lysing"] <- 45
electiondata["V20"][electiondata["kommun"] == "Kumla-Lysing"] <- 45
electiondata["V21"][electiondata["kommun"] == "Kumla-Lysing"] <- 0
electiondata["V22"][electiondata["kommun"] == "Kumla-Lysing"] <- 25
electiondata["V23"][electiondata["kommun"] == "Kumla-Lysing"] <- 3
electiondata["V24"][electiondata["kommun"] == "Kumla-Lysing"] <- 17

electiondata["V18"][electiondata["kommun"] == "Rök"] <- 227
electiondata["V19"][electiondata["kommun"] == "Rök"] <- 173
electiondata["V20"][electiondata["kommun"] == "Rök"] <- 173
electiondata["V21"][electiondata["kommun"] == "Rök"] <- 0
electiondata["V22"][electiondata["kommun"] == "Rök"] <- 101
electiondata["V23"][electiondata["kommun"] == "Rök"] <- 52
electiondata["V24"][electiondata["kommun"] == "Rök"] <- 20

electiondata["V26"][electiondata["kommun"] == "Heda"] <- 214
electiondata["V27"][electiondata["kommun"] == "Heda"] <- 197
electiondata["V28"][electiondata["kommun"] == "Heda"] <- 197
electiondata["V29"][electiondata["kommun"] == "Heda"] <- 0
electiondata["V30"][electiondata["kommun"] == "Heda"] <- 149
electiondata["V31"][electiondata["kommun"] == "Heda"] <- 4
electiondata["V32"][electiondata["kommun"] == "Heda"] <- 44
  
electiondata["V26"][electiondata["kommun"] == "Kumla-Lysing"] <- 57 
electiondata["V27"][electiondata["kommun"] == "Kumla-Lysing"] <- 49
electiondata["V28"][electiondata["kommun"] == "Kumla-Lysing"] <- 49
electiondata["V29"][electiondata["kommun"] == "Kumla-Lysing"] <- 0
electiondata["V30"][electiondata["kommun"] == "Kumla-Lysing"] <- 29
electiondata["V31"][electiondata["kommun"] == "Kumla-Lysing"] <- 2
electiondata["V32"][electiondata["kommun"] == "Kumla-Lysing"] <- 18
  
electiondata["V26"][electiondata["kommun"] == "Rök"] <- 240
electiondata["V27"][electiondata["kommun"] == "Rök"] <- 169
electiondata["V28"][electiondata["kommun"] == "Rök"] <- 169
electiondata["V29"][electiondata["kommun"] == "Rök"] <- 0
electiondata["V30"][electiondata["kommun"] == "Rök"] <- 94
electiondata["V31"][electiondata["kommun"] == "Rök"] <- 30
electiondata["V32"][electiondata["kommun"] == "Rök"] <- 45

## Fellingsbro in Örebro County is for some reason missing electoral data for the 1911-1917 elections
electiondata["V10"][electiondata["kommun"] == "Fellingsbro"] <- 1534
electiondata["V11"][electiondata["kommun"] == "Fellingsbro"] <- 529
electiondata["V12"][electiondata["kommun"] == "Fellingsbro"] <- 528
electiondata["V13"][electiondata["kommun"] == "Fellingsbro"] <- 1
electiondata["V14"][electiondata["kommun"] == "Fellingsbro"] <- 83
electiondata["V15"][electiondata["kommun"] == "Fellingsbro"] <- 270
electiondata["V16"][electiondata["kommun"] == "Fellingsbro"] <- 174
  
electiondata["V18"][electiondata["kommun"] == "Fellingsbro"] <- 1507
electiondata["V19"][electiondata["kommun"] == "Fellingsbro"] <- 725
electiondata["V20"][electiondata["kommun"] == "Fellingsbro"] <- 724
electiondata["V21"][electiondata["kommun"] == "Fellingsbro"] <- 1
electiondata["V22"][electiondata["kommun"] == "Fellingsbro"] <- 350
electiondata["V23"][electiondata["kommun"] == "Fellingsbro"] <- 168
electiondata["V24"][electiondata["kommun"] == "Fellingsbro"] <- 206
  
electiondata["V26"][electiondata["kommun"] == "Fellingsbro"] <- 1523
electiondata["V27"][electiondata["kommun"] == "Fellingsbro"] <- 676
electiondata["V28"][electiondata["kommun"] == "Fellingsbro"] <- 669
electiondata["V29"][electiondata["kommun"] == "Fellingsbro"] <- 7
electiondata["V30"][electiondata["kommun"] == "Fellingsbro"] <- 245
electiondata["V31"][electiondata["kommun"] == "Fellingsbro"] <- 192
electiondata["V32"][electiondata["kommun"] == "Fellingsbro"] <- 232

electiondata["V34"][electiondata["kommun"] == "Fellingsbro"] <- 1564
electiondata["V35"][electiondata["kommun"] == "Fellingsbro"] <- 763
electiondata["V36"][electiondata["kommun"] == "Fellingsbro"] <- 763
electiondata["V37"][electiondata["kommun"] == "Fellingsbro"] <- 0 
electiondata["V38"][electiondata["kommun"] == "Fellingsbro"] <- 103
electiondata["V39"][electiondata["kommun"] == "Fellingsbro"] <- 178
electiondata["V40"][electiondata["kommun"] == "Fellingsbro"] <- 239
electiondata["V41"][electiondata["kommun"] == "Fellingsbro"] <- 230
electiondata["V42"][electiondata["kommun"] == "Fellingsbro"] <- 13  
  

## creating the political analysis variables that will be used in the analysis: participation rates,
## vote shares for the various parties, and so on. Consult the SND dataset lathund for explanations of what
## each variable ("V10" etc) contains.

electiondata$partic1911=100*electiondata$V11/electiondata$V10
electiondata$partic1914v=100*electiondata$V19/electiondata$V18
electiondata$partic1914h=100*electiondata$V27/electiondata$V26
electiondata$partic1917=100*electiondata$V35/electiondata$V34
electiondata$partic1920=100*electiondata$V46/electiondata$V43
electiondata$partic1921=100*electiondata$V62/electiondata$V58
electiondata$partic1921m=100*electiondata$V59/electiondata$V64
electiondata$partic1921w=100*electiondata$V60/electiondata$V65
electiondata$partic1924=100*electiondata$V75/electiondata$V72

electiondata$partic1928=100*electiondata$V90/electiondata$V87
electiondata$partic1928m=100*electiondata$V88/electiondata$V93
electiondata$partic1928w=100*electiondata$V89/electiondata$V94

electiondata$partic1932=100*electiondata$V104/electiondata$V101
electiondata$partic1932m=100*electiondata$V102/electiondata$V107
electiondata$partic1932w=100*electiondata$V103/electiondata$V108

electiondata$partic1936=100*electiondata$V121/electiondata$V118
electiondata$partic1936m=100*electiondata$V119/electiondata$V124
electiondata$partic1936w=100*electiondata$V120/electiondata$V125

electiondata$partic1940=100*electiondata$V137/electiondata$V134
electiondata$partic1940m=100*electiondata$V135/electiondata$V140
electiondata$partic1940w=100*electiondata$V136/electiondata$V141

electiondata$partic1944=100*electiondata$V151/electiondata$V148
electiondata$partic1944m=100*electiondata$V149/electiondata$V154
electiondata$partic1944w=100*electiondata$V150/electiondata$V155


electiondata$gendergap1921<-electiondata$partic1921w/electiondata$partic1921m
electiondata$gendergap1928<-electiondata$partic1928w/electiondata$partic1928m
electiondata$gendergap1940<-electiondata$partic1940w/electiondata$partic1940m

electiondata$socdem1911=100*electiondata$V16/electiondata$V12
electiondata$socdem1914v=100*electiondata$V24/electiondata$V20
electiondata$socdem1914h=100*electiondata$V32/electiondata$V28
electiondata$socdem1917=100*electiondata$V41/electiondata$V36
electiondata$socdem1920=100*electiondata$V55/electiondata$V47
electiondata$socdem1921=100*electiondata$V70/electiondata$V62
electiondata$socdem1924=100*electiondata$V84/electiondata$V76
electiondata$socdem1928=100*electiondata$V99/electiondata$V91
electiondata$socdem1932=100*electiondata$V113/electiondata$V105
electiondata$socdem1936=100*electiondata$V129/electiondata$V122
electiondata$socdem1940=100*electiondata$V145/electiondata$V138
electiondata$socdem1944=100*electiondata$V159/electiondata$V152

electiondata$farmers1917=100*electiondata$V39/electiondata$V36
electiondata$farmers1921=100*electiondata$V67/electiondata$V62
electiondata$farmers1928=100*electiondata$V96/electiondata$V91
electiondata$farmers1932=100*electiondata$V110/electiondata$V105
electiondata$farmers1944=100*electiondata$V157/electiondata$V152

electiondata$lib1911=100*electiondata$V15/electiondata$V12
electiondata$lib1921=100*electiondata$V68/electiondata$V62
electiondata$lib1928=100*(electiondata$V97+electiondata$V98)/electiondata$V91
electiondata$lib1932=100*(electiondata$V111+electiondata$V112)/electiondata$V105
electiondata$lib1944=100*electiondata$V158/electiondata$V152

electiondata$kons1911=100*electiondata$V14/electiondata$V12
electiondata$kons1914v=100*electiondata$V22/electiondata$V20
electiondata$kons1914h=100*electiondata$V30/electiondata$V28
electiondata$kons1917=100*electiondata$V38/electiondata$V36
electiondata$kons1920=100*electiondata$V51/electiondata$V47
electiondata$kons1921=100*electiondata$V66/electiondata$V62
electiondata$kons1924=100*electiondata$V80/electiondata$V76
electiondata$kons1928=100*electiondata$V95/electiondata$V91
electiondata$kons1932=100*electiondata$V109/electiondata$V105
electiondata$kons1936=100*electiondata$V126/electiondata$V122
electiondata$kons1940=100*electiondata$V142/electiondata$V138
electiondata$kons1944=100*electiondata$V156/electiondata$V152

electiondata$kommunist1921=100*electiondata$V71/electiondata$V62
electiondata$kommunist1928=100*electiondata$V100/electiondata$V91
electiondata$kommunist1932=100*(electiondata$V114+electiondata$V115+electiondata$V116)/electiondata$V105
electiondata$kommunist1944=100*electiondata$V160/electiondata$V152

## the variable "left" is all Socialist/Communist parties to the left of the SAP
electiondata$left1917=100*electiondata$V42/electiondata$V36
electiondata$left1920=100*electiondata$V56/electiondata$V47
electiondata$left1921=100*electiondata$V71/electiondata$V62
electiondata$left1924=100*(electiondata$V85+electiondata$V86)/electiondata$V76
electiondata$left1928=100*electiondata$V100/electiondata$V91
electiondata$left1932=100*(electiondata$V114+electiondata$V115+electiondata$V116)/electiondata$V105
electiondata$left1936=100*(electiondata$V130+electiondata$V131)/electiondata$V122
electiondata$left1940=100*(electiondata$V146+electiondata$V147)/electiondata$V138
electiondata$left1944=100*electiondata$V160/electiondata$V152

electiondata$nazi1936=100*electiondata$V132/electiondata$V122




## EXPORTING THE ELECTION DATA

setwd("~/Library/CloudStorage/Dropbox/09 Sonderweg/Replication/temp")
write.xlsx(electiondata, "electiondata.xlsx")

